首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Comm
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Comm
admin
2018-10-18
51
问题
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:
Private Sub Commandl_Click()
Dim a(10)As Integer,x As Integer
For i=1 To 10
a(i)=Int(Rnd*100)
Next
x=InputBox("输入100以内的整数:"):p=0
For i=1 To 10
Ifa(i)=x Then
p=i:Exit For
End If
Next
Ifp=0 Then
Print"没有找到与输入数据相同的数!"
Else
Print Str(x)+”在数组中的位置是”+Str(p)
End If
End Sub
对于上述事件过程,以下叙述中正确的是
选项
A、本程序实际产生的随机数是0.99
B、若产生的随机数中有相同数,则p是其中最后一个数的位置
C、程序有错,p的初值设置不对
D、程序有错,InputBox函数产生的数据与x的类型不匹配
答案
A
解析
随机数函数Rnd的功能是用于产生一个小于l但大于或等于0的随机数。为了生成某个指定范围内的随机整数,可使用以下公式:Int((upperbound-lowerbound+1)*Rnd+lowerbound),其中upperbound是随机整数范围的上限,lowerbound是随机整数范围的下限。本题中upperbound为99,lowerhound为0。
转载请注明原文地址:https://kaotiyun.com/show/xXFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
决定标签内容显示位置的属性是
以下关于VB特点的叙述中,错误的是
下列不包含滚动条的控件是()。
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
在一个工程的窗体中有如下代码:PublicxAsIntegerPrivateSubForm_Load()DimyAsIntegerEndSub在该工程的标准模块的声明部分有如下代码:
某二叉树共有12个节点,其中叶子节点只有1个。则该二叉树的深度为(根节点在第1层)()。
下列有关文件的叙述中,正确的是()。
程序流程图中带有箭头的线段表示的是()。
下面不属于软件需求分析阶段主要工作的是()。
某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)( )。
随机试题
某9层住宅,建筑高度24.3m,属于()建筑。
下列选项中,属于绩效反馈面谈的原则与技巧的是()。
《公路工程施工监理合同范本》由()组成。
根据《危险化学品安全管理条例》,依法设立的危险化学品生产企业,必须向()申请领取危险化学品生产许可证。
下列属于工程施工技术管理资料主要内容酌是( )。
光明公司需要建一座厂房,占用厂区土地5亩,原始成本20万元/亩,现价50万元/亩,则该厂房的投资中除包括建造成本外,还应包括100万元的土地成本。()
TheWorld’sLoneliestPhoneBoothForalmost40years,alonephoneboothstoodintheMojaveDesert.about75milessouthw
1920年8月,中国第一个共产党组织在上海建立,成员有陈独秀、李汉俊、李达等,会议推选陈独秀为书记,并函约各地社会主义分子组织支部。1920年10月,李大钊、张国焘等在北京成立共产党北京支部,李大钊任书记。从1920年秋至1921年春,董必武、陈潭秋、包惠
Sheisawomanof____whohasneverabandonedherprinciplesforthesakeofherownbenefits.
A、Theycouldworktogetherwiththewhite.B、Theirchildrenstudiedinthesameschoolsasthewhite’s.C、Theysharedthesamep
最新回复
(
0
)