单项选择题
运行下列程序:
Option Base 1
Private Sub Form_Click()
y = 43
x = Array(21, 4, 50, 18, 23, 44, 87, 32, 67, 70)
For i = 1 To 10
If x(i) < y Then
z = x(i) + 1
y = x(i)
Else
z = z + y
End If
Next i
Print z
End Sub
单击窗体后,则在窗体上显示的结果是()。
- A.43
B.21
C.37
D.44
点击查看答案&解析
相关考题
-
单项选择题
运行下列程序:Private Sub Form_Click()a = 32: b = 5Doa = a / 2b = b + 1Loop While b Print aEnd Sub单击窗体后,则在窗体上显示的结果是()。
A.1
B.2
C.5
D.11 -
单项选择题
如果在立即窗口中执行以下操作:x=1 '表示回车,下同y=2Print x > y则输出结果是()。A. -1B.1C.FalseD.True
A.1
C.False
D.True -
单项选择题
运行下列程序:Private Sub Form_Click()Dim sum As Double, i As IntegerFor i = 1 To 20If i Mod 5 = 0 Thensum = sum + iEnd IfNext iPrint sumEnd Sub单击窗体后,则在窗体上显示的结果是()。
A.50
B.100
C.4
D.5050
