填空题
运行下列程序,输入如下两行:
Hi,
I am here.
弹出的窗体中的显示结果是______。
Private Sub Command11_C1ick()
Dim abc As String,sum As string
sum=""
DO
abc=InputBox("输入abc")
If Right(abc,1) ="." Then Exit Do
sum=sum+abC
Loop
MsgBox sum
End Sub
1、
【正确答案】
1、Hi,
【答案解析】
[解析] 本题考查循环语句和条件语句的嵌套。变量abc的值为输入的两行字符串,对第一行,其最右边字符为“, ”,不满足Riqht(abc,1)=”.”,因此变量sum的值更新为“Hi,”,对第二行,其最右边字符为“.”,满足Riqht(abc,1) =”.”,则退出循环,因此最终sum的值为“Hi,”。
提交答案
关闭