单项选择题

下列程序输出结果为______。
Private Sub Command1_Click()
Dim a As Boolean
a=True
If a Then GoTo L1 Else GoTo L2
L1:
Print"VB"
L2:
Print"VC"
End Sub

A．VB
B．VC
C．VB
VC
D．出错!

<上一题目录下一题>

热门试题

单项选择题

执行以下Command1的Click事件过程，在窗体上显示______。 Option Base 0 Private Sub Command1_Click() Dim a a=Array( a , b , c , d , e , f , g ) Print a(1); a(3); a(5) End Sub

A．abc
B．bdf
C．ace
D．出错

单项选择题

下列语句组中，不能实现循环100次的有

A．N=0
Do
N=N+1
Loop Until N＞=100
B．N=0
Do
N=N+1
Loop While n＜100
C．N=0
Do
N=N+1
Loop Until N＜100
D．N=0
Do While n＜100
N=N+1
Loop

相关试题