单项选择题
在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写下列程序:
Private Sub Command1 click()
A=InputBox("请输入日期(1~31)")
t="旅游景点:"_
&Ⅱf(A>0 And A<=10,"长城","")_
&Ⅱf(A>10 And A<=20,"故宫","")_
&Ⅱf(A>20 And A<=30,"颐和园","")
Text1.Text=t
End Sub
程序运行后,如果从键盘输入5,则在文本框中显示的内容是( )。
A.旅游景点:长城
B.旅游景点:长城颐和园
C.旅游景点:颐和园
D.旅游景点:故宫
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮,名称为Command1,然后编写下列程序: Private Sub Command1_Click() For i=1 To 2 For j=1 To i Print String(i, Hello ) Next j Print Next i End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.H
HH
HH
B.H
HHHH
C.HHHHH
HH
HHHH
D.H
点击查看答案&解析
单项选择题
窗体上有名称为Text1、Text2的两个文本框,和一个由3个单选按钮构成的控件数组Option1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图 2所示。为了实现上述功能,在程序中的横线处应填入的内容是( )。 Private Sub Option1_Click(Index As Integer) If Text1.Text<> Then Select Case______ Case 0 Text2.Text=Text1.Text Case 1 Text2.Text=Text1.Text*10 Case 2 Text2.Text=Text1.Text*100 End Setect End If End Sub
A.Opfion1.Index
B.Index
C.Opfion1.(Index)
D.Opfion1(Index).Value
点击查看答案&解析
相关试题
滚动条的最小值属性是______,最大值...
在窗体上画两个组合框,其名称分别为Combo...
在程序的每个空白处填写一条适当的语句,使...
表达式Len(Str(1.3))Mod 2的值为...
设A=2,B=-2,则表达式A 2+1>B+...