首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 For j=1 To 4 a(i,j
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 For j=1 To 4 a(i,j
admin
2019-07-30
24
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
Option Base1
Private Sub Command1_Click()
Dim a(4,4)As Integer
For i=1 To 4
For j=1 To 4
a(i,j)=Int(Rnd*100)
Next
Next
x=a(1,1)y=a(1,1)
For i=1 To 4
For j=1 To 4
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://kaotiyun.com/show/OeUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
命任何一个滚动条滚动框件过程如下:PrivateSubCommand1_Click()PrivateFunctionflyAsInteger)x=10Printf(x)
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerx=n*n:Fun=x-11EndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
下列关于滚动条的叙述中,错误的是
设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click()m=-3.6IfSgn(m)Thenn=Int(m)Elsen=Abs(m)
下面程序在调试时出现了死循环PrivateSubCommand1_Click()n=InputBox(“请输入一个整数”)DoIfnMod2=0Thenn=n+1Elsen
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()d=0:c=10:x=Array(10,12,21,32,24)For
下列叙述中正确的是
如果在列表框List1中没有选中项目,则List1.Listlndex的值为
窗体上有1个名为List1的列表框,其中已经输入了若干个项目(如图所示);还有2个文本框,名称分别为Text1、Text2,1个名称为conunandl的命令按钮,并有以下程序。PrivateSubCommand1_Click()
随机试题
资本主义国家向外输出资本形式变化的大体顺序是________。
下列有关血友病的治疗及护理措施中,不正确的是
A.冲突都是不良和消极的B.冲突都是与生俱来的C.冲突可以彻底消除D.管理者应维持高水平的冲突E.鼓励冲突人际关系观点认为
中华医学会全科医学分会成立于哪一年
男性,50岁。被诊断为肺炎球菌肺炎,哪一项化验检查最有价值
长期吸入矿物性粉尘可导致矽肺病。()
代建制的作用主要体现在()。
下列说法错误的是()。
现代制造业发展的趋势是(),物流因此成为制造企业降低成本的关键环节。
罗某有一辆摩托车,因自己购买了汽车,将摩托车卖给了朋友李某,并签订了《购车协议书》,双方实际履行,但未办理过户。后李某又将该车转卖给刘某,也未办理过户。2010年7月底,刘某驾驶该车与郑某发生交通事故,造成对方人身损害。后经交警部门责任认定,刘某负事故责任
最新回复
(
0
)