以下程序的功能是随机产生10个两位的整数： Option Base 1 Private Sub Command1_Click() 　　Dim a(10)As Integer 　　Dim i As Integer 　　Randomize 　　For i＝1

admin2020-02-27 28

问题以下程序的功能是随机产生10个两位的整数：
Option Base 1
Private Sub Command1_Click()
　　Dim a(10)As Integer
　　Dim 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函数生成的随机数在0～1之间，包括0但不包括1，所以有可能产生0，与题目要求的两位的整数不符。所以语句a(i)＝Int(Rnd * 100)＋1需要修改为a(i)＝Int(Rnd * 90)＋10，这样就能正确产生两位的整数了。

转载请注明原文地址:https://kaotiyun.com/show/dLTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

以下程序的功能是随机产生10个两位的整数： Option Base 1 Private Sub Command1_Click() 　　Dim a(10)As Integer 　　Dim i As Integer 　　Randomize 　　For i＝1

二级VB

NCRE全国计算机二级

定义部门关系模式如下：部门(部门号，部门名，部门成员，部门总经理)，使它不满足第一范式的属性是()。

在进行逻辑设计时，将E—R图中实体之间联系转换为关系数据库的()。

在学校里，教师可以讲授不同的课程，同一课程也可由不同教师讲授，则实体教师与实体课程间的联系是()。

以下叙述中，错误的是()。

下列叙述中正确的是()。

在数据库管理技术发展的三个阶段中，没有专门的软件对数据进行管理的是()。

设程序中有以下语句：MsgBox“Visual”，，“Basic”，“等级考试”，2执行该语句后，显示一个信息框，以下关于该信息框的叙述中，正确的是()。

下列VisualBasic函数中，计算结果为字符串型的是()。

面向对象方法中，继承是指(　　)。

Ifsustainablecompetitiveadvantagedependsonworkforceskills,Americanfirmshaveaproblem.Humanresourcemanagementisn

所欲与之聚之，所恶勿施，尔也。

胃肠解痉药服用解热镇痛药用于止痛服用

履行FOB交货条件下的进口合同，应由()负责派船将货物运到合同规定的目的地。

甲公司申领房屋拆迁许可证，应当提交()等资料。如被拆迁人王某对拆迁估价结果有异议，可以采取的救济方式为()。

处于更新改造过程中而停止使用的固定资产，应当转入在建工程，停止计提折旧。()

—Youdidn’tattendthepartylastnight?—-No,I______,forthepartywasputoffforsomereason.

Thesuppliersaidthedepartment______morestockinthefuture.

以下程序的功能是随机产生10个两位的整数： Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer Dim i As Integer Randomize For i＝1

二级VB

NCRE全国计算机二级

定义部门关系模式如下：部门(部门号，部门名，部门成员，部门总经理)，使它不满足第一范式的属性是()。

在进行逻辑设计时，将E—R图中实体之间联系转换为关系数据库的()。

在学校里，教师可以讲授不同的课程，同一课程也可由不同教师讲授，则实体教师与实体课程间的联系是()。

以下叙述中，错误的是()。

下列叙述中正确的是()。

在数据库管理技术发展的三个阶段中，没有专门的软件对数据进行管理的是()。

设程序中有以下语句：MsgBox“Visual”，，“Basic”，“等级考试”，2执行该语句后，显示一个信息框，以下关于该信息框的叙述中，正确的是()。

下列VisualBasic函数中，计算结果为字符串型的是()。

面向对象方法中，继承是指( )。

Ifsustainablecompetitiveadvantagedependsonworkforceskills,Americanfirmshaveaproblem.Humanresourcemanagementisn

所欲与之聚之，所恶勿施，尔也。

胃肠解痉药服用解热镇痛药用于止痛服用

履行FOB交货条件下的进口合同，应由()负责派船将货物运到合同规定的目的地。

甲公司申领房屋拆迁许可证，应当提交()等资料。如被拆迁人王某对拆迁估价结果有异议，可以采取的救济方式为()。

处于更新改造过程中而停止使用的固定资产，应当转入在建工程，停止计提折旧。()

—Youdidn’tattendthepartylastnight?—-No,I______,forthepartywasputoffforsomereason.

Thesuppliersaidthedepartment______morestockinthefuture.

以下程序的功能是随机产生10个两位的整数： Option Base 1 Private Sub Command1_Click() 　　Dim a(10)As Integer 　　Dim i As Integer 　　Randomize 　　For i＝1

面向对象方法中，继承是指(　　)。