首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command 1_Click() Dim a(4,4)As Integer For i=1 To 4 Forj=1 To
窗体上有一个名称为Command 1的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command 1_Click() Dim a(4,4)As Integer For i=1 To 4 Forj=1 To
admin
2015-05-29
57
问题
窗体上有一个名称为Command 1的命令按钮,其单击事件过程如下:
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(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/hRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
下列程序执行后,n的值为n=0ForI=1To200IfIMod4=0Thenn=n+1NextI
在窗体上画一个名称为Drivel的驱动器列表框,一个名称为Dirl的目录列表框,一个名称为Filel的文件列表框,两个名称分别为Label1、Label2、标题分别为空白和“共有文件”的标签。编写程序,使得驱动器列表框与目录列表框、目录列表框与文件列表框同
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0:i=2
若要求从文本框中输入密码时在文本框中只显示“*”号,则应当在此文本框的属性窗口中设置
以下程序的功能是:把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommand1_Click()DiminDataAsStringText
下列不能打开菜单编辑器的操作是()。
如果在立即窗口中执行以下操作:a=8b=9print(a>B);则输出结果为______。
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2。要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。PrivateSub
随机试题
简述教师的作用有哪些。
孙中山的三民主义包括民族主义、民权主义和【】
肝脓肿典型CT表现包括
新生儿肺炎可分为
金黄散主要适用于()
关于子公司发生超额亏损在合并资产负债表的反映,下列说法中不正确的有()。
一名美籍华人进入中国大陆旅游时,须在边防检查站交验的有效证件是()。
Thepremisewithwhichthemulticulturalistsbeginisunexceptional:thatitisimportanttorecognizeandtocelebratethewide
WhendoingbusinesswithanArab,youhavetoendurehoursofsmalltalk,waitingforthetopicofcommercetobebroached.
Customersmayalsobepermittedto______theircurrentaccountsforashortperiodinanticipationofacredititemcomingin.
最新回复
(
0
)