单项选择题

当Form_Click事件发生时，程序输出的结果是 ______。
Private Sub Form Click()
Dim a As Integer，b As Integer，c As Integer
a=1: b=1
Print a; b
Do
c=a+b
Print c
a=b:b=c
Loop Until c＞=5
End Sub

A．1 1 1
B．2 3 5
C．2 5 7
D．2 3 4

<上一题目录下一题>

热门试题

单项选择题

当Command1_Click事件发生时，窗体上显示的内容是 ______。 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer If a = 0 Then x = x-1 Else If b ＜＞ 0 Then x = 7 Else x=x+8 End If If c ＜＞ 0 Then x = x-3 Else x = 4 End If Print x End Sub

A．7
B．8
C．4
D．3

单项选择题

在窗体上画一个按钮，然后编写如下事件代码。单击按钮，输出为 ______。 Private Function fun3(x As Integer) Static t As Integer t = t + 3 t = t + x fun3 = t End Function Private Sub Commandl Click() Dim a As Integer, b As Integer, c As Integer a = 2 : b = 1 c = fun3 (a) c = fun3 (b) Print c End Sub

A．6
B．8
C．9
D．12

相关试题