未知题型
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是 ______。
A.10
B.20
C.30
D.40
- A.Text
B.Text=x
C.10
B.20
C.30
【参考答案】
A
解析：SelectCase执行时，首先计算SelectCase语句中的测试表达式的值，然后从第一个Case开......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
未知题型
下列url优化说法正确的是（） -
单项选择题
热辐射随温度升高其作用增强，温度越高的物体黑体辐射能力越强（ ）
A．对
B．错 -
未知题型
在窗体上画—个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text==' ' Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print 'VisualBasic'； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是 ______。A.Visual BasicB.程序设计C.A程序设计D.Visual Basic程序设计
A.Text=='
B.SetFocus
C.Visual
D.程序设计
C.A程序设计
D.Visual
