单项选择题

设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：
Private Sub Command1_Click()
x!=Val(Text1.Text)
Select Case x
Case Is＜-10.Is＞=20
Print"输入错误"
Case Is＜0
Print 20-x
Case Is＜10
Print 20
Case Is＜=20
Print x+10
End Select
End Sub
程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是______。

A) 5
B) 20
C) 25
D) 输入错误

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim a(3，3) For m=1 To 3 For n=1 To 3 If n=m Or n=4-m Then a(m，n)=m+n Else a(m，n)=0 End If Print a(m，n)； Next n Print Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为______。

A) 2 0 0
0 4 0
0 0 6
B) 2 0 4
0 4 0
4 0 6
C) 2 3 0
3 4 0
0 0 6
D) 2 0 0
0 4 5
0 5 6

单项选择题

窗体上有名称为Command1的命令按钮和名称为Text1的文本框，编写如下程序： Private Sub Command1_Click() Text1.Text= 程序设计 Text1.SetFocus End Sub Private Sub Text1_GotFocus() Text1.Text= 等级考试 End Sub 运行以上程序，单击命令按钮后______。

A) 文本框中显示的是"程序设计"，且焦点在文本框中
B) 文本框中显示的是"等级考试"，且焦点在文本框中
C) 文本框中显示的是"程序设计"，且焦点在命令按钮上
D) 文本框中显示的是"等级考试"，且焦点在命令按钮上

相关试题