单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub Command1_Click()
Dim i As Integer,j As Integer
Dim a(10, 10) As Integer
For i=1 To 3
For j=1 To 3
a(i，j)=(i-1)*3+j
Print a(i,j)；
Next j
Print
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是______。

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

单项选择题
设窗体上有一个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100。下面叙述中正确的是______。
A) 程序运行时，若使滚动块向右移动，滚动条的Value属性值就增加
B) 程序运行时，若使滚动块向右移动，滚动条的Value属性值就减少
C) 由于滚动条的Max属性值小于Min属性值，程序会出错
D) 由于滚动条的Max属性值小于Min属性值，程序运行时滚动条的长度会缩为一点，滚动块无法移动
单项选择题
在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程： Private Sub Command1_Click() x=Val(Text1.Text) Select Case x Case 1.3 y=x*x Case Is＞=10.Is＜=-10 y=x Case-10 To 10 y=-x End Select End Sub 程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是______。
A) 执行y=x*x
B) 执行y=-x
C) 先执行y=x*x，再执行y=-x
D) 程序出错
相关试题