请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
Private Sub Commandl Click（）
Dim i As Integer, j As Integer
Dim a （10,10）As Integer
For i=1 To 3
For j= i To 3
a（i,j）=（i-1）*3+j
Print a （i,j）;
Next j
Next i
End Sub
程序运行后，单击命令按钮，窗体上显示的是（）。
答案
更多“Private Sub Commandl Click（） Dim i As Integer, j As Integer Dim a （10,10）As Int”相关的问题
第1题
A．4
B．5
C．6
D．7
第2题
.jpg)
注意：
文件必须存放在考生文件夹中，工程文件名为execise83.vbp，窗体文件名为 execlse83.frm。
第3题
Private Sub Command1_Click()
Text 1="VB programming"
Text 2=Text 1
Text 1="ABCD"
End Sub
程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。
第4题
.jpg)
注意：
文件必须存放在考生文件夹中，工程文件名为execise41.vbp，窗体文件名为 execise41.frm。
第5题
A.程序运行有错误，数据类型不匹配
B.程序运行有错误，InputBox函数的格式不对
C.在Label1中显示5
D.在Label1中显示23
第6题
A．13.45.8
B．135
C．1 4 7
D．无数据输出
第7题
Option Base 1
Private Sub Command1_Click（）
Dim a As Variant
a=Array（1,2,3,4,5）
Sum=0
For i=1 To 5
Sum = sum+a（i）
Next i
x=Sum/5
For i =1 To 5
If a（i）＞x Then Print a（i）;
Next i
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是（）。
A．1 2
B．1 2 3
C．3 4 5
D．4 5
第8题
in属性设置为0，Value属性设置为100。程序运行后，滚动框位于滚动条最右端，如果单击滚动条之外的窗体部分，则滚动框跳到最左端，如图2－1所示。
注意：只能直接为相应的属性赋值，不得使用任何变量。保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。
图2-1
（2）在Form1的窗体上绘制一个命令按钮，名为md1，标题为Display，按钮隐藏。编写适当的事件过程，使程序运行后，若单击窗体，则命令按钮出现；
此时如果单击命令按钮，则在窗体上显示Visual Basic。程序运行情况如图2-2，2-3所示。
图2-2 图2-3
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj2.vbp，窗体文件名为sj2.frm。
