2. 计算机
  3. 窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Option Base1 Private Sub Command1_Click() Dim a(4，4)As Integer For i=1To4 For j=1To4 a(i，j)=In

窗体上有一个名称为Command1的命令按钮，其单击事件过程如下： Option Base1 Private Sub Command1_Click() Dim a(4，4)As Integer For i=1To4 For j=1To4 a(i，j)=In

admin2016-09-19  32
问题 窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：
Option Base1
Private Sub Command1_Click()
Dim a(4，4)As Integer
For i=1To4
For j=1To4
a(i，j)=Int(Rnd*100)
Next
Next
x=a(1，1)y=a(1，1)
For i=1To4
For j=1To4
If x＜a(i，j)Then x=a(i，j)
If y＞a(i，j)Then y=a(i，j)
Next
s=s+a(i，i)
Next
Print x，y，s
End Sub
关于以上程序，以下叙述中错误的是
选项 A、二维数组元素的值是不大于99的随机整数
B、计算结果x是二维数组各元素中的最大数
C、计算结果y是二维数组各元素中的最小数
D、计算结果s是二维数组各行第一个元素之和
答案D
解析 随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数，本题中产生的整数不会大于99；后一个二重循环用于遍历整个二维数组并且进行比较，如果数组元素的值大于x则成为新的最大值，小于y则成为新的最小值，循环结束后x是二维数组各元素中的最大数，y是二维数组各元素中的最小数。s中存放的是二维数组对角线元素之和。
转载请注明原文地址:https://jikaoti.com/ti/o0J0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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