单项选择题

有如下程序：
Function F(a As Integer)
　　b = 0
　　Static c
　　b = b + 1
　　c = c + 2
　　F = a + b + c
End Function
Private Sub Command1_Click( )
　　Dim a As Integer
　　a = 2
　　For i = 1 To 3
　　　　Print F

A．;
　　Next i
End S

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名称为Timer1的计时器、一个名称为Command1的命令按钮和一个名称为Label1的标签。程序如下： Private Sub Command1_Click( ) Timer1.Enabled = True Timer1.Interval = 1000 End Sub Private Sub Timer1_timer( ) Label1.Caption = Time End Sub 当运行程序后，单击命令按钮，将在标签中显示的内容形式为________。

A．Time
B．True
C．1000
D．10:06:55

单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim x As Integer, y As Integer x = 41: y = 54 Call sub1(x, y) x = x + 1 Print x; y End Sub Private Sub sub1(n As Integer, ByVal m As Integer) n = n Mod 10 m = m 10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是________。

A．41　54
B．2　54
C．1　3
D．42　3

相关试题