首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Comm
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下: Private Sub Comm
admin
2019-06-11
98
问题
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:
Private Sub Command 1 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
选项
A、本程序实际产生的随机数是0一99
B、若产生的随机数中有相同数,则P是其中最后一个数的位置
C、程序有错,P的初值设置不对
D、程序有错,InDutBox函数产生的数据与x的类型不匹配
答案
A
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数。为了生成某个指定范围内的随机整数,可使用以下公式:Int((upperbound—lowerbound+1)*Rnd+lowerbounff),其中uppcrbound是随机整数范围的上限,lowerbound是随机整数范围的下限。本题中upperbound为99,lowerbound为0。
转载请注明原文地址:https://kaotiyun.com/show/V3Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4Forj=1Tois=s+jNe
求1!+21+…+10!的程序如下:PrivateFunctions(xAsInteger)f=1Fori=1Toxf=f*iNexts=fEndFunction
以下不能输出“Program”的语句是()。
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPriva
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是()。
在VisualBasic中,表达式3*2\5Mod3的值是()。
有如下程序代码:PrivateSubForm_Click()DimxAsInteger,yAsInteger,numAsIntegerx=3y=xDoUntilx>=6num
下列对数据库的描述中不正确的是()。
运行如下程序:PrivateSubCommand1_Click()Dima(5,5)AsIntegerFori=1To5Forj=1To4a(i,j)=i*2+jIfa(i,j)
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个名称为Label1、标题为“列表框的使用”的标签。再画一个名称为List1的列表框,列表中含有5个表项,表项内容分别为“北京”、“山西”、“辽
随机试题
总的说来,传播学传统学派的中心在( )。
增感屏受激发,产生荧光的物质是
关于房地产经纪服务主要特点的说法,正确的是()。[2010年考试真题]
我国社会主义道德建设的基本原则是()。
在合作学习中合作、沟通为什么能够促进学生的意义建构?
下面说法正确的是()
[*]
LotsofstudiessuggestthatthoseofuslookingforMr.orMs.RightmayactuallybelookingforMr.FacialSymmetryorMs.Ide
在OSI参考模型中,实现节点到节点的流量控制、分组路由等功能的协议层是(28)。
TheLostArtofListeningA)"Whywon’theevenlistentomyidea?""WhyamIcutoffbeforeIprovidethewholestory?"How
最新回复
(
0
)