单项选择题
在窗体上丽一个命令按钮(其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
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮。有下列程序: Option Base 1 Private Sub Command1_Click( ) Dim a a=Array(45,27,34,24,91,37,11,67,82,63) For i=1 To 9 For j=i+1 To 10 If a(i)>a(j)Then a1=a(i) a(i)=a(j) a(j)=a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub 程序运行后,单击命令按钮,则窗体上第二行和第三行显示的内容是______。
A.27和34
B.34和24
C.45和63
D.24和27
点击查看答案&解析
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim n As Integer For n=0 To 9 Step 3 Print rel(n); Next n End Sub Private Function tel(ByVal i As Integer)As Integer Dim x As Integer x=0 For j=1 To i If i<5 Then rel=i:Exit Function x=x+j Next j rel=x End Function 程序运行后,单击命令按钮,则窗体上显示的内容是______。
A.1 3 5 7
B.2 8 14 53
C.0 3 21 45
D.0 5 11 34
点击查看答案&解析
相关试题
在窗体上画一个命令按钮,其名称为Command...
在窗体上画一个文本框(Text1),然后编写...
在窗体上画一个文本框,然后编写如下代码:...
把窗体的KeyPreview属性设置为True,然后编...
在窗体上画一个命令按钮,然后编写如下程序...