首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,i As Integer Randomize
以下程序的功能是随机产生10个两位的整数: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,i As Integer Randomize
admin
2018-10-15
78
问题
以下程序的功能是随机产生10个两位的整数:
Option Base 1
Private Sub Commandl_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/6HFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt的文本文件,其内容如下:3243765828129857314253647586
假定有下面的程序:PrivateSubForm_Click()DimNAsIntegerN=InputBox("输入一个2位整数")Print(N-Int(N/10)*10)*10+Int(N/
为了返回或设置磁盘驱动器的名称,应使用的驱动器列表框的属性是
(1)在名称为Form1的窗体上添加一个名称为Label1标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为
在考生文件夹下有一个工程文件sjt3.vbp,包含2个窗体,名称分别为Form1、Form2。窗体上已有部分控件,请在Form1窗体上再添加1个名称为Text1的文本框,Text属性为空,Enable属性设置为False(如图所示),输入字符时文本框内将显
在名称为Form1的窗体上用名称为Shape1的形状控件添加一个其直径为1000(高、宽均为1000)的圆;再添加两个标题分别是“垂直线”和“水平线”,名称分别为Command1、Command2的命令按钮,如图所示。然后编写两个命令按钮的Click事件过
下列操作说明中,错误的是()。
以下关于文件的叙述中,错误的是()。
在面向对象方法中,不属于“对象”基本特点的是()。
要删除列表框中最后一个列表项,正确的语句是()。
随机试题
驾驶机动车跨越双实线行驶属于什么行为?
符合脂肪变性的描述是
某县县城“网吧、游戏厅一条街”上,有近百家网吧和游戏厅。许多中小学生一放学就前往玩游戏、上网,有的甚至为此旷课和彻夜不归。对此,广大家长反映极大。强烈要求关闭这些网吧和游戏厅。2009年5月,县公安局和文化局根据上级的统一部署,开展了“整治网吧和游戏厅”联
发行金融债券的主体不包括()。
人的身心发展的年龄特征表明了个体的发展具有()
为简化同步发电机三相短路的分析计算,采用了一些假设条件,下列各组条件中,属于同步发电机三相短路分析假设条件的一组是()。
班级成员在服从班集体的正确决定和承担责任的前提下,参与班级全程管理的方式称为常规管理。()
已知有甲、乙、丙、丁四个数,甲、乙之和大于丙、丁之和,甲、丁之和大于乙、丙之和,乙、丁之和大于甲、丙之和。根据以上请判断这四个数谁最小?()
前景理论的主要观点什么?
Thedreamofpersonalisedflightisstillvividinthemindsofmanyinventors,somedevelopingcycle-poweredcraft,others【C1】_
最新回复
(
0
)