首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,有程序如下: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer’第1个For For i=1 To 1
窗体上有一个名称为Commandl的命令按钮,有程序如下: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer’第1个For For i=1 To 1
admin
2020-04-18
57
问题
窗体上有一个名称为Commandl的命令按钮,有程序如下:
Option Base 1
Private Sub Commandl_Click()
Dim a(10)As Integer’第1个For
For i=1 To 10
a(i)=Int(Rnd*100+100)
Print a(i);
Next
x=a(i):y=x‘第2个For
For i=1 To 10
Ifx
Ify>a(i)Then y=a(i)
s=s+a(i)
Next
Print x,y,s
End Sub
关于上述程序的叙述中,正确的是
选项
A、程序运行出错,第1个For循环之后的x=a(i)赋值语句错
B、程序正常运行,x是10个随机数中的最大值
C、程序正常运行,s是10个随机数的和
D、程序正常运行,10个随机数的范围是100-200
答案
A
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数的范围是100-199;在第一个循环结束后,循环变量i的值为不满足循环条件的值11,在紧随其后的x=a(i)语句将会执行出错,因为出现了数组越界。
转载请注明原文地址:https://kaotiyun.com/show/wdTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()n=0Fori=0To10X=2*i-1IfXMod3=0Thenn=n+1NextiP
编写如下程序:PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=1:y=1Do
输入VB源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写以下程序代码:PrivateSubsub1(ByRefd(),ByRefm1AsInteger)DimiAsIntegerm1=d(
VisualBasic源程序的续行符为
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"c:\d4.
设a、b、c为整型变量,其值分别为4、5、6。以下程序段的输出结果是()。a=b:b=c:c=aPrinta;b;c
度为3的一棵树共有30个结点,其中度为3,1的结点个数分别为3,4。则该树中的叶子结点数为()。
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
随机试题
治疗噎膈气虚阳微证,偏于肾虚者,应首选
进行变更地籍测量前应准备的资料主要有()。
等离子弧的能量集中,温度高,焰流速度大,这些特性使得等离子弧广泛应用于()。
以下出口货物的生产企业,须事先申请卫生注册登记的是()。
艺博公司A部门为利润中心,其业绩考核的有关数据如下:销售收入80000元,已销产品变动成本和变动销售费用30000元,可控固定成本8000元,公司分配来的管理费用2500元。要求:计算A部门边际贡献总额、负责人可控利润总额和部门可控利润总额。
实行定期定额征收方式的个体工商户需要停业的,应当在停业前向税务机关申报办理停业登记。()
下列关于诉讼时效中止的表述,不正确的是()。
铁路民警小王巡逻时发现,某村一老大爷因为子女不尽赡养义务,想要卧轨自杀,下列现场处置措施恰当的有()。
descriptivetranslationstudies
Broadbandconnectivityisatransformativetooltoachievethethreepillarsofsustainabledevelopment—economicgrowth,socia
最新回复
(
0
)