单项选择题

Command1_Click()事件代码如下：
Private Sub Command1_Click()
Dim x As Integer, Y As Integer
x = 6 : Y : 8
Call ABC(X, Y)
Print X; Y
End Sub
Private Sub ABC(ByVal X As Integer，Y As Integer)
X = X + 4
Y = Y = 2
End Sub
事件发生后，X和Y的值分别为 ______。

A．6, 8
B．10, 10
C．10, 8
D．6, 10
<上一题 目录 下一题>
热门 试题

单项选择题
对于如下程序，单击Co皿andl事件发生后，窗体上显示的内容为 ______。 Private Sub Command1_Click() Dim i As Integer,a a As Integer Do While i＜20 Do While True If i Mod 10 = 0 Then Exit Do Else i=i-1 End If Loop i=i+11 a=a+1 Loop Print a End Sub
A．21
B．32
C．33
D．11
单项选择题
执行下面的程序，单击命令按钮后，窗体中的输出结果是 ______。 Private Sub Cotomand1_Click() Ch$= Welcome Home! a=Len(ch$) For i= 1 To a b$ = Mid(ch$， i 1) If b$ = m Then m = m + 1 Next 1 Print m End Sub
A．2
B．3
C．1
D．0
相关试题