单项选择题

程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3，3)As Integer Dim i As Integer,j As Integer Dim s As Integer For i=0 To 3 For j=0 To 3 aa(i，j)=i*4+j+1 Next j Next i For i=0 To 3 s=s+aa(i，1) Next i Print s End Sub

A．32
B．28
C．30
D．36

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个按钮，然后编写如下的事件代码。在按钮上单击，输出为( )。 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

相关试题