单项选择题
在窗体上画一个名称为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); Nextj Print Next i End Sub 程序运行后,单击命令按钮,窗体上显示的是
A.1 2 3 24 6 3 6 9
B.2 3 4 3 4 5 4 5 6
C.1 4 7 2 5 8 3 6 9
D.1 2 3 4 5 6 7 8 9
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim x As Integer,n As Integer x=1 n=0 Do While x<20 X=K*3 n=n+1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是
A.15和1
B.27和3
C.195和3
D.600和4
点击查看答案&解析
单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Text1.Text=”” Call Pl(x,y,z) Text1.Text=Str(z) End Sub Sub Pl(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是
A.0
B.12
C.Str(
D.没有显示
点击查看答案&解析
相关试题
以下叙述中错误的是
在窗体上有一个文本框控件,名称为TxtTime...
在窗体上画一个名称为Text1的文本框和一个...
在窗体上画一个命令按钮,名称为Command1...
以下叙述中错误的是