在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编
问题:
在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:
Private Sub Command1+Click()
a=InputBox(“请输入日期(1~31)”)
t=“旅游景点:”
&If(a > 0 And a <= 10, “长城”," ")
&IIf(a > 10 And a <= 20, “故宫”," ")
&IIf(a>20 And a<=31, “颐和园”," ")
Text1.Text=t
End Sub
程序运行后,如果从键盘上输入16,则在文本框中显示的内容是
A.旅游景点:长城故宫
B.旅游景点:长城颐和园
C.旅游景点:颐和园
D.旅游景点:故宫