首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Command 1_Click() Dim a(10)As Integer,i As Integer Randomize For i=1 To 10
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Command 1_Click() Dim a(10)As Integer,i As Integer Randomize For i=1 To 10
admin
2018-10-18
31
问题
以下程序的功能是随机产生10个两位的整数:
Option Base 1
Private Sub Command 1_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((upperboundlowerbound+1)*Rnd+lowerbound),其中upperbotmd是随机整数范围的上限,lowerbound是随机整数范围的下限。本题中upperbound为99,lowerbound为10。
转载请注明原文地址:https://kaotiyun.com/show/sPFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中,如右图所示,放开鼠标左键后,停止同步显示。下面可以实现此功能的程序是()。
设窗体上有2个文本框Textl和Text2,并有下面的事件过程:DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"<=Chr(KeyAscii)A
在窗体上画一个名称为Command1的命令按钮,并编写如下程序OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=1To4
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4Forj=1Tois=S+
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsIntegerbAsIntegerEndTypeP
窗体上有1个名称为Command1的命令按钮,事件过程及函数过程如下:PrivateSubCommand1_Click()DimmAsStringm=InputBox("请输入字符串")
下列叙述中正确的是()。
设窗体上有一个Pictum1图片框,要求在图片框中的指定位置(坐标为(500,300))输出“OK”,下面可以实现这一功能的事件过程是()。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
下列说法中,错误的是
随机试题
根据心理活动的速度、强度及灵活性的不同,在日常生活中,一般将人的气质划分为四种类型,即__________、__________、__________及__________。
下列关于萃取操作的描述,正确的是()。
理顺行政组织与企业的职能关系,企业作为独立法人实体,应()
护理工作的质量监控的自我监控中最重要的层次是
对竣工时遗留的或试车中发现必须新增的安全、()保护措施,要安排投资和材料限期完成。
就住宅建筑本身而言,低层建筑比多层、高层造价低,但占地面积大,从造价和节约用地两个方面综合考虑,国内外的经验都认为比较经济的住宅是()的。
列举黄自的音乐作品。
对于美国人口总体来说平均的期望寿命是73.9岁,但是在夏威夷出生的小孩子将平均77岁,而那些在路易斯安那出生的人将平均活到71.7岁。如果一对从路易斯安那来的新婚夫妇在夏威夷开始他们的家庭生活,那么,他们的孩子预期将比他们留在路易斯安那的情况下活得更长。
汇率的标价法
A、Drivingquickly.B、Drinkingalot.C、Fidgeting.D、Beinglazy.C
最新回复
(
0
)