单项选择题

在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。
Private Sub func(a As Integer)
Static m As Integer
Dim n As Integer
m=m+a
n=n+a
Print m；n
End Sub
Private Sub Command1_Click()
Dim k As Integer
k=4
Call func(k)
Call func(k)
End Sub

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

单项选择题
设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程； Private Sub Command1_Click() Static x As Integer x=10 y=5 y=f(x) Print x；y End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A．10 5
B．20 5
C．20 40
D．10 40
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s；a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是( )。
A．7 9
B．34 0
C．9 7
D．死循环
相关试题