首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command 1 Click() Dim a(4,4)As Integer For i=1 To 4 Forj=1 To 4 a(i
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command 1 Click() Dim a(4,4)As Integer For i=1 To 4 Forj=1 To 4 a(i
admin
2015-12-09
45
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:
Option Base 1
Private Sub Command 1 Click()
Dim a(4,4)As Integer
For i=1 To 4
Forj=1 To 4
a(i,j)=Int(Rnd*100)
Next
Next
x=a(1,1)y=a(1,1)
For i=1 To 4
Forj=1 To 4
Ifx
Ify>a(i,j)Then y=a(i,j)
Next
s=s+
选项
A、二维数组元素的值是不大于99的随机整数
B、计算结果X是二维数组各元素中的最大数
C、计算结果y是二维数组各元素中的最小数
D、计算结果s是二维数组各行第一个元素之和
答案
D
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数不会大于99;后一个二重循环用于遍历整个二维数组并且进行比较,如果数组元素的值大于x则成为新的最大值。小于y则成为新的最小值,循环结束后x是二维数组各元素中的最大数,y是二维数组各元素中的最小数。s中存放的是二维数组对角线元素之和。
转载请注明原文地址:https://kaotiyun.com/show/QALp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Forml的窗体上绘制一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:PrivateSUbForm_CnCk()Open"d:\tes\smtext1.txt"
当执行以下过程时,在名为lplResult的标签框内将显示()。PrivateSubcmdlt_C1ick()Dimi,rr=0Fori=1To5Step1r=r+i
为了选择多个控件,可以按住上______键,然后单击每个控件。
要使文本框可输入多行文字,要更改的默认选项是
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。PrivateSubForm_Click()DimxAsSingle,yAsS
在计算机软件系统的体系结构中,数据库管理系统位于用户和______之间。
对关系S和R进行集合运算,结果中既包含s中的所有元组也包含R中的所有元组,这样的集合运算称为()。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_Change事件过程中应使用的语句是______。
VisualBasic中的控件分为3类,它们是标准控件、______和可插入对象。
数据独立性是数据库技术的重要特点之一。所谓数据独立性是指()。
随机试题
多系统或(和)器官衰竭最常见的是()
男,42岁。半年来左上后牙遇冷热痛,但无自发痛,近1个月来,除冷热过敏外隐隐作痛。近1周出现自发痛,阵发加剧,夜间痛。检查发现左上第二磨牙近中龋深穿髓,探痛明显,叩痛(±)。当该患牙出现阵发剧痛一段时间后,未经治疗疼痛反而减轻,但出现咀嚼痛,其最可能
某女,月经每33~35日一行,带经期3天,量中,伴轻微小腹胀痛,诊断为
如果汇票的付款人一项上,填写的是汇票出票人的名字,则该种汇票与下列哪种票据的作用相似?()
在下列哪些选项中,时间、地点或者方法是犯罪构成客观方面的构成因素?()
按照海上保险的惯例,全部损失可分为()。
在教育目的问题上,德国教育家赫尔巴特的主张体现了()。
请你用“热火朝天”。结合安全生产问题,以城市建设为中心,再加上两个成语,讲个故事。
Youknowwhatotherpeoplemean.twotimes
Thecinemahaslearnedagreatdealfromthetheateraboutpresentation.Gonearethedayswhencrowdswerepackedonwoodenben
最新回复
(
0
)