题目内容

在窗体画2个命令按钮，名称分别为Command1、Command2，然后编写下列事件过程： Const n=5, m=4 Dim a(m, n) Private Sub Command1_Click() k=1 For i=1 To m For j=1 To n a(i,j)=k:k=k+1 Next j,i End Sub Private Sub Command2_Click() summ=0 For i=1 To m 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,i Print sum End Sub 过程Command1_Click()的作用是在二维数组a中存放1个m行n列的矩阵；过程Command2_Click()的作用是______。

A. 计算矩阵外围一圈元素的累加和
B. 计算矩阵除外围一圈以外的所有元素的累加和
C. 计算矩阵第1列和最后一列元素的累加和
D. 计算矩阵第1行和最后一行元素的累加和

查看答案

搜索结果不匹配？点我反馈

更多问题

窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1_Click() Sub prog(a()As Integer) Dim arr(5) As Integer n=UBound(a) For k=1 To 5 For i=n To 2 step-1 arr(k)=k For i=1 To n-1 Next k if a(j)＜a(j+1) Then Prog arr() t=a(j):a(j)=a(j+1)):a(j+1)=t Fork=1 To 5 End If Print arr(k); Next j Next k Next i End Sub End Sub 程序运行时，单击命令按钮后显示的是______。

A. 1 2 3 4
B. 5 4 3 2 1
C. 0 1 2 3 4
D. 4 3 2 1 0

在窗体画一个名为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=j10 Next i Print s End Sub 运行上面的程序，其输出结果是______。

A. 1234
B. 12
C. 34
D. 4321

在窗体画一个名为Command1的命令按钮，然后编写以下程序： Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M(2+M(x)) End Sub 运行程序，单击命令按钮，在窗体上显示的是______。

A. 6
B. 5
C. 7
D. 8

如果管理层建立哪些与关联方关系及其交易相关的控制，注册会计师应当询问管理层和被审计单位内部其他人员，实施其他适当的风险评估程序，以获取对相关控制的了解