在窗体上绘制一个命令按钮和一个文本框，名称分别为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，则在文本框中显示的内容是