在窗体上画两个命令按钮，名称分别为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行和最后—行元素的累加和

[单选题]在窗体上画2个命令按钮，名称分别为Command1、command2，并编写如下程序C．onst n=5,m=4D．im a（m,n）Private Sub Command1_Click（）K=1F．or i=1 To mF．or j=1 To na（i,j）=kk=k+1Next jNext iPrivate Sub Command2_Click（）Summ=0F．or i=1 To mF．or j=1 To nIf i=1 Or i=m ThenSumm=summ+a（i,j）E．lseIf

[主观题]在窗体上画两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后，如果单击“初始化”命令按钮，则对数组a的各元素赋值；如果单击“求和”命令按钮，则求出数组a的各元素之和，并在文本框中显示出来，如图所示。请填空。Option Base 1D．im a（3,2）As IntegerPrivate Sub Command1_Click（）F．or i = 1 To 3F．or j = 1 To 2________ = i + jNext jNext iE

[单选题]（ 35 ）在窗体上画 2 个命令按钮，名称分别为 Command1 、 command2 ，并编写如下程序C．onst n=5,m=4D．im a （ m,n ）Private Sub Command1_Click （）K=1F．or i=1 To mF．or j=1 To na （ i,j ） =kk=k+1Next jNext iE．nd SubPrivate Sub Command2_Click （）Summ=0F．or i=1 To mF．or j=1 To nIf i=1 Or i=

[单选题]在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click() Print "Visual"； End Sub Private Sub Command2_Click() Print "Basic"； End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是A．Bas

[单选题]在窗体上画—个命令按钮(名称为Command1)，并编写如下代码：Function Fun1 (ByVala As Integer, b As Integer)As Integer Dim t As Integer t=a-b b=t+ a Fun 1=t+ bEnd FunctionPrivate Sub Command1_ Click() Dim x As Integer x=10 Print Fun1(Fun1 (x,(Fun1(x，x-1))),x-1)End Sub程序运行后，单击命令

[单选题]在窗体上画—个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程： PrivateSubCommand1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2，4，6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本眶Text1中输入10，然后单击命令按钮，则在Text2中显示

[单选题]（ 20 ）在窗体上画一个命令按钮和两个标签，其名称分别为 Command1 、 Label1 和 Label2 ，然后编写如下事件过程：Private Sub Command1_Click()a = 0F．or i = 1 To 10a = a + 1b = 0F．or j = 1 To 10a = a + 1b = b + 2Next jNext iLabel1.Caption = Str(a ）Label2.Caption = Str(b ）E．nd Sub程序运行后，单击命令按钮，在标签

[单选题]在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：D．im Flag As BooleanPrivate Sub Command1_Click（）D．im intNum As IntegerintNum=InputBox（"请输入："）If Flag ThenPrint f（intNum）E．nd IfE．nd SubF．unction f（X As Integer）As IntegerIf X<10 ThenY=XE．lseY=X+10E．nd Iff=YE．nd F

[单选题]（ 33 ）在窗体上画 1 个名称为 Command1 的命令按钮，然后编写如下事件过程Option Base 1Pribate Sub Command1_Click （）D．im a （ 5.5 ） As IntegerF．or i=1 To 5F．or j=1to5a （ i+j ） *5/10Next jNext is=0F．or i=1 To 5s=s+a （ i,i ）Next iPrint sE．nd Sub程序运行后，单击命令按钮，输出结果是（ ）A． ） 15B． ） 13C．

[单选题]（ 28 ）在窗体上画一个命令按钮（名称为 Command1 ） ，并编写如下代码：F．unctin Fun1(Byval a As Integer ,b As Integer) As IntegerD．im t As Integert=a-bb=t+aF．un1=t+bE．nd FunctionPrivate Sub Command1_Click()D．im x As IntegerX=10Print Fun1(Fun1(x,(Fun1(x,x-1))),x-1)E．nd Sub程序运行后，单