首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
35
问题
窗体上有一个名称为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全国计算机二级
相关试题推荐
以下关于控件的叙述中,正确的是
设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发
下面可以产生20~30(含20和30)的随机整数的表达式是
下列操作说明中,错误的是
以下关于控件的叙述中,正确的是
设窗体上有一个文本框,名称为Text1,程序运行后,要求该文本框只能显示信息,不能接收输入的信息,以下能实现该操作的语句是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.tim,包含了所有控件和部分程序,如图3—109所示。要求如下:①利用属性窗口向列表框添加四个项目:VisualBasic、TurboC、C++、Java。
列表框中的项目保存在一个数组中,这个数组的名字是
为了清除列表框中指定的项目,应使用的方法是
随机试题
试述社会主义市场经济体制的主要任务。
孔子说:“己所不欲,勿施于人”。与这句话意思最不接近的项是()
MicrosoftWindows7系统自带的上网浏览器为_______。
Aperson’shomeisasmuchareflectionofhispersonalityastheclotheshewears,thefoodheeatsandthefriendswithwhom
高压氧舱内灭火装置禁用_________或_________灭火。
男,18岁,以上唇肿胀2年就诊,检查发现双唇肿胀,稍硬,有弹性,唇部鲜红色,有皱褶,以上唇明显。左侧鼻唇沟变浅,口角稍下垂。口内检查可见舌背多数沟裂。正确的诊断应该是
早期中心型肺癌的常见症状是
各种操作人员可以自行任意换自己的操作口令。()
曹某系个体商贩,某日,曾与其一起服过刑的高某找到他,拿出3万元现金让曹某为其保管。当曹某问“是什么钱”时,高某做了一个“偷”的手势,让其不要多问。半个月后,高某取走2万元,数日后交给曹某一个塑料纸包,说是“白面”(毒品),找到买主就取走。后来,高某被公安机
A=BOOKREVIEW1B=BOOKREVIEW2C=BOOKREVIEW3D=BOOKREVIEW4Whichbookreview(s)contain(s)thefollowinginformation?
最新回复
(
0
)