首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,单击该按钮时所实现的功能 是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Com
窗体上有一个名称为Command1的命令按钮,单击该按钮时所实现的功能 是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Com
admin
2018-09-19
48
问题
窗体上有一个名称为Command1的命令按钮,单击该按钮时所实现的功能
是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Dim a(10) As Integer
Dim x As Integer
For i = 1 To 10
a(i) = Int(Rnd * 100)
Next
x = InputBox("输入100以内的整数:")
p = 0
For i = 1 To 10
If a(i) = x Then
p = i
Exit For
End If
Next
If p = 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生成的随机数为0-1的小数,乘以100后取整后范围为0-99,选A)。
转载请注明原文地址:https://kaotiyun.com/show/l6Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Form1的窗体上添加两个标签(名称分别为Labell和Label2,标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2,Text属性均为空)和一个命令按钮(名称为Command1,标题为“显示”),如图1所示。然后
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a)
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是( )。
某二叉树中有n个叶子结点,则该二叉树中度为2的结点数为
编写如下程序:DimxAsInteger,yAsInteger,zAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2:y=3:z=10
以下关于通用对话框的叙述中,错误的是
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
在关系数据库中,用来表示实体间联系的是
某二叉树共有12个节点,其中叶子节点只有1个。则该二叉树的深度为(根节点在第1层)()。
随机试题
某学生做事比较扎实,四平八稳,自制力也很强。该生的气质类型是【】
长期应付款的实质性程序通常包括()
女性,50岁。心悸,心电图示房颤,胸片及PDE检查未见心脏结构异常,查体可见
中暑痉挛的病人可采取的治疗措施有
资料1资料2浙江浙海公司进出口公司(3313910194)在对口合同项下进口蓝湿牛皮,委托浙江嘉宁皮革有限公司(3313920237)加工牛皮沙发革,承运船舶在帕腊纳瓜港装货启运,航经大阪,又泊停釜山港转“HANSASTAVANG
下列关于世界金融市场发展的说法,错误的是()。
人力资源规划的步骤有:①提供人力资源信息;②评估人力资源规划;③组织目标与战略分析;④供需匹配;⑤执行计划与实施监控;⑥人员预测。对其排列顺序正确的是()。
唐朝诗人王维出使到边塞,被眼前的奇异风光所震撼,写下了“大漠孤烟直,长河落日圆”的名句。无独有偶,宋代范仲淹在边塞军中也做过类似描写,其诗句是:_________________,____________________。
年逾花甲的国际机构领导人谈起《论语》来_______,一个外国人竟有如此深厚的中华文化功底,让在场嘉宾不禁暗暗_______。填入画横线部分最恰当的一项是:
简述自我效能感的基本含义及提高措施。
最新回复
(
0
)