单项选择题
在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click()
Dim a(3, 3)
For m = 1 To 3
For n = 1 To 3
If n = m Or n = 4 - m Then
a(m, n) = m + n
Else
a(m, n) = 0
End If
Print a(m, n);
Next n
Print
Next m
End Sub
运行程序,单击命令按铡,窗体上显示的内容为( )。
A) 2 0 0
0 4 0
0 0 6
B) 2 0 4
0 4 0
4 0 6
C) 2 3 0
3 4 0
0 0 6
D) 2 0 0
0 4 5
0 5 6
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序: Private Sub func(L As Label) L. Caption = 1234 End Sub Private Sub Form_Load() Label1. Caption = ABCDE Label2. Caption = 10 End Sub Private Sub Command1_Click() a = Val(Label2. Caption) Call fune(Label1) Label2. Caption = a End Sub 程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。
A) ABCD和10
B) 1234和100
C) ABCD和100
D) 1234和10
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a = Array(1, 2, 3, 4) j = 1 For i = 4 To 1 Step - 1 s = s + a(i) * j j = j * 10 Next i Print s End Sub 程序运行后,单击命令按钮,其输出结果是( )。
A) 4321
B) 1234
C) 34
D) 12
点击查看答案&解析
相关试题
在窗体上画一个命令按钮和一个文本框(名称...
设在工程文件中有一个标准模块,其中定义了...
设有语句: Open c: Test. Dat For...
在窗体上画一个命令按钮,名称为Command1...
设有以下程序: Private Sub Form_Clic...