单项选择题

在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Private Sub Command1_Click() Dim a(5,5) 　　For i=1 To 3 　　　　For j=1 To 4 　　　　　　a(i,j)=i*j 　　　　Next 　　Next 　　For n=1 To 2 　　　　For m=1 To 3 　　　　　　Print a(m,n)； 　　　　Next 　　Next End Sub 程序运行后，单击命令按钮，输出结果是

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

单项选择题
有如下的程序： Private Sub Command1_Click() Dim k As Integer，m As Integer Dim P As Integer k=4：m=1 P=Fun(k,m)：Print P； P=Fun(k,m)：Print P End Sub Private Function Fun(a As Integer，b As Integer) Static m As Integer，i As Integer in=5：i=2 i=i+m+1 m=i+a+b Fun=m 2 End Function 单击命令按钮后，输出结果为
A．2 2
B．4 4
C．5 5
D．6 6
单项选择题
单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer a=3:b=4:c=5 Print SecProc(c,b,a) End Sub Function FirProc(x As Integer，y As Integer，z As Integer) FirProc=2*x+y+3*z+2 End Function Function SecProc(x As Integer，y As Integer，z As Integer) SecProc=FirProc(z,x,y)+x+7 End Function
A．20
B．25
C．37
D．32
相关试题