2. 计算机
  3. 阅读下列程序： Option Base 1 Private Sub Form Click( ) Dim x(3, 3) For j = 1 to 3 For k = 1 to 3 If j = k then x(j, k) = 1 If j ＜ ＞ k t

阅读下列程序： Option Base 1 Private Sub Form Click( ) Dim x(3, 3) For j = 1 to 3 For k = 1 to 3 If j = k then x(j, k) = 1 If j ＜ ＞ k t

admin2009-01-19  49
问题 阅读下列程序：
Option Base 1
Private Sub Form Click( )
Dim x(3, 3)
For j = 1 to 3
For k = 1 to 3
If j = k then x(j, k) = 1
If j ＜ ＞ k then x(j, k) =3
Next k
Next j
Call fun(x( ) )
End Sub
Private Sub fun(a( ) )
For j = 1 to 3
For k = 1 to 3
Print a(j, k);
Next k
Next j
End Sub
运行程序时，输出的结果是【  】。
选项
答案133313331
解析 事件过程定义中生成了3*3的数组，该数组的主对角线元素为1，其余元素为3。接着调用了通用过程。本题中调用通用过程时，进行虚实结合，在通用过程中访问的a数组就是事件过程中的x数组。在过程中，按行优先顺序输出了a数组所有元素的值。由于在输出时只执行了循环体的“print a(j，k);”，输出数据后有分号，因此输出一行，输出的结果是：133313331。
转载请注明原文地址:https://www.kaotiyun.com/show/yC5p777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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