首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command1_Cliek( ) Dim a(4,4)As Integer For i=1 To 4 Forj=1 To 4
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下: Option Base 1 Private Sub Command1_Cliek( ) Dim a(4,4)As Integer For i=1 To 4 Forj=1 To 4
admin
2015-11-24
59
问题
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:
Option Base 1
Private Sub Command1_Cliek( )
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=
选项
A、二维数组元素的值是不大于99的随机整数
B、计算结果x是二维数组各元素中的最大数
C、计算结果y是二维数组各元素中的最小数
D、计算结果s是二维数组各行第一个元素之和
答案
D
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数不会大于99;后一个二重循环用于遍历整个二维数组并且进行比较,如果数组元素的值大于x则成为新的最大值,小于y则成为新的最小值,循环结束后x是二维数组各元素中的最大数,y是二维数组各元素中的最小数。s中存放的是二维数组对角线元素之和。
转载请注明原文地址:https://kaotiyun.com/show/8kLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面有一段程序代码,如果从键盘上输入"Computer",则在文本框内显示的内容是PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii>=65AndKeyAscii
Sub过程与Function过程最根本的区别是
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5)Fori=1To3Forj=1To4a(i,j)=i*jNe
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click()BT4EndSubPrivateSubBT(xAsInteger)x=x*2+1Ifx<6ThenCallBT(x)EndIf
要将窗体Form1标题设为“学习VB”,以下能正确实现该功能的语句为
有如下程序:PrivateSubForm_Click()DimiAsInteger,sumASIntegersum=0Fori=2To10IfiMod2<>0AndiMod
已知a=5,b=8,c=12,下列表达式的值为True的是()。
一个关系中属性个数为1时,称此关系为
将任意一个正的两位数N的个位数与十位数对换的表达式为()。
随机试题
Thinkofsuccessaswater.Inthecourseofprogress,itflows.Waterbreaksrockandreshapesland.Successsimilarlychangest
可以进行双重造影的检查方法是
急性肝炎( )阻塞性黄疸( )
A.人参归脾丸B.六味地黄丸C.龟灵集D.西洋参E.红参老年人偏于心脾两虚的应服
出院前患者护理包括()。
甲公司以试用买卖方式促销A冰箱,规定试用期3个月,如发现冰箱有质量问题,公司随时给予更换。乙与甲公司签订试用买卖合同,时间自1999年3月15日开始。到了1999年6月16日,甲公司要求乙付款,乙称冰箱有质量问题,要求解除试用合同。下列陈述正确的是:(
在下列报关单证中,海关认为必要时需查阅或收取的预备单证是()。
甲、乙签订合同,甲方购买乙方一批货物,现由于特殊原因的出现,甲方准备解除合同,根据合同法律制度的规定,下列表述中错误的有()。
甲公司2015年发生如下经济业务:(1)甲公司原持有乙公司30%的股权,2015年又斥资10000万元自A公司取得乙公司另外50%股权。至此甲公司持有乙公司80%的股权并取得控制权,甲公司与A公司不存在任何关联方关系。增资时乙公司有1000万元的现金及银
某地方电视台要播放一部30集的电视剧,如果要求每天播出的集数互不相等,则最多可以播放几天?
最新回复
(
0
)