单项选择题

有如下程序段： 　　Private Sub Command1_Click( ) 　　Dim a As Integer 　　a=2 　　For i=1 To 3 　　　　Print G(a) 　　　Next i 　　End Sub 　　Function G(a As Integer) 　　　b=0 　　　Static c 　　　b=b + 1 　　　c=c + 1 　　　G=a + b + c 　　End Function 　　运行上面的程序后，单击命令按钮，输出结果为（ ）。

A． 1 2 3
B． 2 3 4
C． 4 5 6
D． 1 4 6
<上一题 目录 下一题>
热门 试题

填空题
阅读下面的程序：Private Sub Form_Click()Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5 Do Do While Counter < 20 Counter = Counter + 1 If Counter = 10 Then Check = False Exit Do End If Loop Loop Until Check = FalsePrint CounterEnd Sub程序运行后，单击窗体，输出结果为 _________。
填空题
在窗体上有几个对象，运行程序时，当对象得到焦点时，会触发【 】事件，当对象失 去焦点时将触发【 】事件。
相关试题