单项选择题

下面程序运行后，输出的结果是
Dim arr(3,3)
For j=1 To 3
　　For k=1 To 3
　　　　Arr(j,k)=(j-1)*3+k
　　Next k
Next j
For j=2 To 3
　　For j=2 To 3
　　　　Print art(k,j)；
　　Next k
　　Print
Next j

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

单项选择题
在窗体上画一个命令按钮，名称为Commandl。然后编写如下程序： Private Sub Command1_Ctick() For I=1 TO 2 For J=1 TO I Print String(I， Hello )； Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A．H
HH
HH
B．H
HHHH
C．HHHHH
D．H
HH
HHHH
单项选择题
有如下函数过程： Function Fun(By Val x As Ingeger，ByVal y As Integer)As Integer Do While…Y＜＞0 reminder=x Mod Y x=y y=reminder Loop Fun=X End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100:b=25 x=Fun(a,b) Print x End Sub
A．0
B．25
C．50
D．100
相关试题