网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上画两个命令按钮，名称分别为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行和最后—行元素的累加和
参考答案
更多 “ 在窗体上画两个命令按钮，名称分别为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行和最后—行元素的累加和 ” 相关考题
考题
在窗体上画1个命令按钮，并编写如下事件过程iPrivate Sub Commandl—Click()Dim a(3，3)For m=1 T0 3F0r n=1 To 3If n=m Or n=4-m Thena(m，n)=m+nElsea(m，n)：0End IfPrint a(m，n)；Next nPrimNext mEnd Sub运行程序，单击命令按钮，窗体上显示的内容为A．2 0 0B．2 0 4C．2 3 0D．2 0 0
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i，A)Next i x = i + 2 Print x；a End Sub Private Sub fun1(n，m) m=m + n * 2 n = n + m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．1 5B．4 5C．8 4D．3 4
考题
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(p，m，n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x，y+1，(z)) Print x；y；z End Sub 程序运行后，单击命令按钮，则窗体上第二行显示的内容是A．7 6 3B．7 4 2C．6 4 2D．4 6 3
考题
在窗体上画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 6B.2 0 4 0 4 0 4 0 6C.2 3 0 3 4 0 0 0 6D.2 0 0 0 4 5 0 5 6
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n ： 4 TO 0 Step -1 x(n)= n + 1 Print x(n)； Next n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．54321B．4C．54321D．0
考题
在窗体上画三个命令按钮，其名称分别为Command1、Command2和Command3，然后编写如下事件过程： Private Sub Command1 Click() Command2.Enabled = False Command3.Visible = False End Sub程序运行后，单击命令按钮Command1，则执行的操作是______。A．命令按钮Command2和Command3禁用B．命令按钮Command2和Command3隐藏C．命令按钮Command2隐藏，Command3禁用D．命令按钮Command2禁用，Command3隐藏
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
热门标签
最新试卷
