2. 计算机
  3. 设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1_Click() Dima(3,3)As Integer For i＝1 To 3 For j＝1 To 3 a(i,j)＝i*j

设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1_Click() Dima(3,3)As Integer For i＝1 To 3 For j＝1 To 3 a(i,j)＝i*j

admin2010-03-22  25
问题 设有命令按钮Command1的单击事件过程，代码如下：
   Private Sub Command1_Click()
   Dima(3,3)As Integer
   For i＝1 To 3
   For j＝1 To 3
   a(i,j)＝i*j+i+j
   Next j
   Next i
   Sum＝0
   For i＝1 To 3
   Sum＝Sum+a(i,4-i)
   Next i
   MsgBox Sum
   End Sub
   运行程序，单击命令按钮，消息框输出结果是______。
选项
答案22
解析 本题考查VBA中二维数组和循环的知识。本题中的第一个二重循环对二维数组进行赋值，第二个循环完成累加，关键是分析出累加了哪些元素。由循环体可以看出，实际在3次累加中分别累加的是a(1,3)、a(2,2)、 a(3,1)，实际上就是二维数组的对角线，其累加和为 7+8+7＝22。
转载请注明原文地址:https://kaotiyun.com/show/xAwp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)