更多"设有代码如下，当双击窗体内的某个位置时，命令按钮Command1和命令"的相关试题:
[单项选择]在窗体上画2个命令按钮,名称分别为Command1、Command2,并编写如下程序:
Const n=5,m=4
Dim a(m,n)
Private Sub Command1-Click（ ）
k=1
For i=1 To m
For i=1 To n
a(i,j)=k
k=k+1
Next j
Next i
End Sub
Private Sub Command2_Click（ ）
summ=0
For i=1 To m
For i=1 To n
If i=1 or i=m Then
summ=summ+a(i,j)
Else
If j=1 or j=n Then
summ=summ+a(i,j)
End If
End If
Next j
Next i
Print summ
End Sub
过程Command1_Click（ ）的作用是在二维数组a中存放1个m行n列的矩阵；过程Command2-Click（ ）的作用是【 】
A. 计算矩阵外围一圈元素的累加和
B. 计算矩阵除外围一圈以外的所有元素的累加和
C. 计算矩阵第1列和最后一列元素的累加和
D. 计算矩阵第1行和最后一行元素的累加和
[单项选择]在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click（ ） Print "Visual"； End Sub Private Sub Command2_Click（ ） Print "Basic"； End Sub Private Sub Form_Load（ ） Command2.Cancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是
A. Basic
B. Visual
C. Cancel
D. True
[单项选择]
在窗体上画两个命令按钮，名称分别为Command1、Command2，并编写如下程序
Const n=5,m=4
Dim a(m,n)
Private Sub Command1_Click（ ）
k=1
For i=1 To m
Forj=1 To n
a(i,j)=k
k=k+1
Next j
Next i
End Sub
Private Sub Command2_Click（ ）
summ=0
For i=1 Tom
For j=1 To n
If i=1 Or i=m Then
summ=summ+a(i,j)
Else
If j=1 Or j=n Then
summ=summ+a(i,j)
End If
End If
Next j
Next i
Print summ
End Sub
过程Command1 Click（ ）的作用是在二锥数组a中存放—个m行n列的矩阵；过程Command2 Click（ ）的作用是（）。
A. 计算矩阵外围一圈元素的累加和
B. 计算矩外围一圈以外的所有元素的累加和
C. 计算矩阵第1列和最后—列元素的累加和
D. 计算矩阵第1行和最后—行元素的累加和
[单项选择]窗体中有3个命令按钮，分别命名为Command1、Command2和Command3。单击Command1按钮时，Command2按钮变为可用，Command3按钮变为不可见。在下列Command1的单击事件过程中，正确的是( )。
A. private sub Command1_Click()
B. private sub Command1_Click()
C. private sub Command1_Click()
D. private sub Command1_Click()
[单项选择]窗体上添加有3个命令按钮，分别命名为Command1、Command2和Command3，编写Command1的单击事件过程，完成的功能为：当单击按钮Command1时，按钮 Command2可用，按钮Command3不可见。以下事件过程中正确的是( )。
A. Private Sub Command1 Click( )
B. Private Sub Command1 Click( )
C. Private Sub Command1_Click( )
D. Private Sub Command1_Click( )
[单项选择]窗体中有3个按钮Command1、Command2和Command3，该程序的功能是当单击按钮Command1时，按钮2可用，按钮3不可见，正确的程序是
Private Sub Command1_Click（ ）
Command2. Visible=False
Command3. Enabled=True
End Sub
Private Sub Commnd1_Click（ ）
Command2. Visible=False
Command3. Enabled=False
End Sub
Private Sub Command1_Click（ ）
Command2. Enabled=True
Command3. Visible=False
End Sub
Private Sub Command1_Click（ ）
Command2. Visible=True
Command3. Enabled=True
End Sub
[单项选择]窗体上有Command1、Command2两个命令按钮。现编写以下程序： Option Base 0 Dim a（ ）As Integer,m As Integer Private Sub Command1_Click（ ） m=InputBox("请输入—个正整数") ReDim a(m) End Sub Private Sub Command2_Click（ ） m=InputBox("请输入—个正整数") ReDim a(m) End Sub 运行程序时，单击Command1后输入整数10，再单击Command2后输入整数5，则数组a中元素的个数是______。
A. 5
B. 6
C. 10
D. 11
[单项选择]在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1，然后编写如下代码：
Private Sub Command1_Click( )
Text1.Text="AB"
End Sub
Private Sub Command2_Cliek( )
Text1.Text="CD"
End Sub
首先单击Command1按钮，然后再单击Command2按钮，在文本框中显示
A. AB
B. CD
C. ABED
D. CDAB
[填空题]
在窗体上面两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并在文本框中显示出来，如下图所示。请填空。
Option Base 1
Dima(3，2)As Integer
Private
Sub Commandl_Click（ ）
Fori=1 To 3
Forj=1 To 2
[9]
=i+j
Nextj
Nexti
End Sub
Private Sub
Command2_Click（ ）
Forj=1 To 3
Fori=1 To 2
s=s+a(j，i)
Nexti
Nextj
Text1.Text= [10]
End Sub
[填空题]在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并对文本框中显示出来，如图所示。请填空。[*] Option Base 1
Dim a(3，2)As Integer
Private Sub Command1_Click( )
For i=1 To 3
For i=1 To 2
【13】 =i+j
Next j
Next i
End Sub
Private Sub Command2_Click( )
Forj=1 To 3
For i=1 To 2
s=s+ 【14】
Next i
Next j
Text1．Text= 【15】
End Sub
[单项选择]设有命令按钮Commandl的单击事件过程，代码如下：
Private Sub Commandl_Click（ ）
Dima(30)As Integer
Fori=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrltem In a
IfarrltemMod7=0 ThenPrintarrItem；
Ifarrltem＞90ThenExitFor
Next
End Sub
对于该事件过程，以下叙述中错误的是( )。
A. a数组中的数据是30个100以内的整数
B. 语句ForEacharrItem Ina有语法错误
C. Ifarrltem Mod7=0……语句的功能是输出数组中能够被7整除的数
D. Ifarrltem＞90……语句的作用是当数组元素的值大于90时退出For循环
