首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer,i As Integer Randomize
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer,i As Integer Randomize
admin
2020-04-18
61
问题
以下程序的功能是随机产生10个两位的整数:
Option Base 1
Private Sub Command1_Click()
Dim a(10)As Integer,i As Integer
Randomize
For i=1 To 10
a(i)=Int(Rnd*100)+1:Print a(i)
Next i
End Sub
运行以上程序,发现有错误,需要对产生随机数的语句进行修改。以下正确的修改是
选项
A、a(i)=Int(Rnd*100)
B、a(i)=Int(Rnd*90)+10
C、a(i)=Int(Rnd*100)+10
D、a(i)=Int(Rnd*101)
答案
B
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数。为了生成某个指定范围内的随机整数,可使用公式:Int((upperbound—lowerbound+1)*Rnd+lowerbound),其中upperbound是随机整数范围的上限,lowerbound是随机整数范围的下限。本题中upperbound为99,lowerbound为10。
转载请注明原文地址:https://kaotiyun.com/show/s4Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:Subf(xAsInteger,ByValyAsInteger)x=2*x:y=y+xEndSubPrivateSubCommandl_Click()Di
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单前添加一个“√”。以下正确的是
若要清除列表框控件中的所有列表项,应该使用的方法是
在窗体上画一个命令按钮,然后编写如下程序:Subinc(aAsInteger)StaticxAsIntegerx=x+aPrintx;EndSubPrivateSubCommandl_Click()
语句PrintFormatS(23846.5,”000,000.00”)的输出结果是
下面程序运行时,若输入395,则输出结果是PrivateSubCommandl_Click()Dimx%x=InputBox(”请输入一个3位整数”)PrintxMod10,x\100,(xMod
把窗体的KeyPreview属性设置为True。然后编写如下事件过程PrivateSubForm_KeyPress(Key.AsciiAs
下面不属于软件设计原则的是
表达式2*3^2+4*2/2+3^2的值是
在窗体上画2个文本框(名称分别为Text1和Text2),一个命令按钮(名称为Command1)。并定义以下记录类型和变量:PrivateTypeTeacherIDAsIntegerNameAsString*10En
随机试题
奶牛,5岁,右侧腹壁有一直径约30cm的肿胀物,触诊局部柔软,用力推压内容物可还纳腹腔,并可摸到腹壁有一直径约10cm左右的破裂孔,最佳治疗方案是
2000年我国开展了一次全国结核病流行病学调查。该调查将全国各地区划分为东、中、西和京津沪地区,并按有无结核病控制专项项目分为项目地区和非项目地区,在上述各地区中按1:3125的比例,随机抽取257个调查点,每个点的人数约为1500人。调查发现,我国的活动
某看守所干警甲,因涉嫌虐待被监管人乙被立案侦查。在审查起诉期间,A地基层检察院认为甲情节显著轻微,不构成犯罪.遂作不起诉处理。关于该决定,下列哪一选项是正确的?(2008年试卷2第24题)
植物及植物产品的检验检疫证单有效期为( )天。
甲公司设有一个基本生产车间及两个辅助生产车间,基本生产车间大量大批生产甲、乙两种产品,辅助生产车间为供电车间、机修车间。2017年3月有关业务资料如下:(1)3月初甲在产品直接材料30万元,直接人工12万元,制造费用8万元,合计50万元。乙产品无在产品。
学校工作必须坚持以______。
(2012年华南理工大学、2015年武汉大学、2017年南开大学)代理问题。
Australianchildrenarevisitingsocialmediawebsitesatanincreasinglyyoungerage,anewsurveysuggests,withoneinfive"
某公司网络的地址是200.16.192.0/18,划分成16个子网,下面的选项中不属于这16个子网网址的是__________。(2009年下半年试题)
InEnglandalongastretchofthenorth-easecoastwhichgentlycurvesfromNorthumberlandtotheestuaryoftheriverTees,the
最新回复
(
0
)