题目内容

执行下列程序段后,窗体输出的结果是( )。 Dim a As Integer a = Val(InputBox("请输入a的值", , 6)) '直接按回车键 Select Case a Case 1 To 4 Print "A" Case Is > 3 Print "B" Case 5 To 10 Print "C" Case Else Print "D" End Select

A
B
C
D

查看答案
更多问题

有语句If X = 0 Then Y = 0,下列叙述中,正确的是( )。

A. X=0和Y=0均为赋值语句
B. X=0和Y=0均为关系表达式
C. X=0为关系表达式,Y=0为赋值语句
D. X=0为赋值语句,Y=0为关系表达式

求出x,y两数中最小数,并把最小数保存在Min变量中,下列程序段不正确的是( )。

A. If x < y Then Min = x Else Min = y
B. Min = IIf(x < y,x,y)
C. Min = x : If y < = x Then Min = y
D. If y < = x Then Min = y : Min = x

窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() a = 80: b = 50: c = 30 If a < b Or b > c Then b = c If b = c And a < c Then a = a - 30 If a = b And b > c Then c = a + b Print a, b, c End Sub 运行时,单击按钮,窗体输出的结果是(

A. 80 50 30
B. 80 30 30
C. 50 30 80
D. 50 30 30

窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() Dim i As Integer Dim sum As Integer sum = 0 For i = 1 To 200 sum = sum + i If i Mod 19 = 18 Then Exit For End If Next i Print sum End Sub 运行时,单击按钮,输出结果是(

A. 20100
B. 0
C. 190
D. 171

答案查题题库