单项选择题
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:
Option Base 1
Private Sub Command1_Click()
Dim a(4,4)
For i=1 To 4
For j=1 To 4
a(i,j)=(i-1)*3+j
Next j
Next i
For i=3 To 4
For j=3 To 4
Print a(j,i);
Next j
Next i
End Sub
程序运行后,单击命令按钮,其输出结果为 ______ 。
A.6 9 7 10
B.7 10 8 11
C.8 11 9 12
D.9 12 10 13
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后,在键盘上输入“abcdefg”,单击命令按钮,则文本框中显示的内容为 ______ 。
A.abcdefg
B.不显示任何信息
C.ABCDEFG
D.出错
点击查看答案&解析
单项选择题
假定有如下的Sub过程: Sub S(x As Single,y As Single) t=x x=t y y=t Mod y End Sub 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 S a,b Print a,b End Sub 程序运行后,单击命令按钮,输出结果为 ______ 。
A.5 4
B.1 1
C.1.25 4
D.1.25 1
点击查看答案&解析
相关试题
在窗体上画两个名称分别为Text1、Text2的...