首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
admin
2017-06-22
27
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下:
①单击“产生数组”按钮,则用随机函数生成10个0~100之间(不含0和100)互不相同的数值,并将它们保存到一维数组a中,同时也将这10个数值显示在Text1文本框内;
②单击“查找”,按钮将弹出输入对话框,接收用户输入的任意一个数,并在一维数组a中查找该数,若查找失败,则在Text2文本框内显示该数“不存在于数组中”;否则显示该数在数组中的位置。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。
选项
答案
Rnd()函数用于产生一个小于1但大于或等于0的随机数值,为了生成某个范围内的随机整数,可使用以下公式:Int((upperbound-lowerbound+1)*Rnd+lowerbound)。upperbound是随机数范围的上限,而lowerbound则是随机数范围的下限。 本题在“生成数组”按钮的单击事件过程中,通过For循环生成10个0~100之间(不含0和100)互不相同的随机数,并存入数组a,其中生成函数的表达式应为:Fix(Rnd*99+1)。为防止生成相同的随机数值,每新生成一个随机数后,都通过For循环让其与之前生成的i-一个随机数逐一比较,若新生成的随机数已存在,则将当前循环变量i的值减1,重新为数组元素a(i)生成随机数。 在“查找”按钮的单击事件过程中,通过For循环让数组a中的元素逐一与用户在输入对话框中输入的数相比较,若条件表达式a(i)=num成立,则表示找到相同的数,并在文本框Text2中显示相关信息。若没找到相同的数,循环结束后循环变量i>10,则在Text2文本框内显示该数“不存在于数组中”。
解析
步骤1:打开考生文件夹中的本题工程文件sjt5.vbp, 在窗体上画两个命令按钮,属性及其值如下表所示。
步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。
参考代码:
a(i)=Fix(Rnd*99+1)
Forj=1 To i—1
i=i—1
Ifa(i)=hum Then
Ifi>10 Then
步骤3:按要求将文件保存至考生文件夹中。
转载请注明原文地址:https://kaotiyun.com/show/lDGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。OptionBase1PrivateSubCommand1_Click()Dimarr1DimMinAsInteger,i
软件测试可分为白盒测试和黑盒测试。基本路径测试属于【】测试。
在窗体上画一个名称为Commana1的命令按钮,然后编写如下程序:DimSWAsBooleanFunctionfunc(XAsInteger)AsIntegerIfX<20Then
如果要在任何新建的模块中自动插入optionExplicit语句,则应采用下列______操作步骤。
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3arr(i)=iNextix=Input
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完
在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()b=5c=6Printa=b+cEndSub程序运行
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:optionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
不改变关系表中的属性个数但能减少元组个数的是____________。
随机试题
______herealizeditwastoolatetoreturnhome.
A.螺旋器B.骨半规管C.前庭D.壶腹嵴E.耳蜗属于听觉感受器的是
药物与血浆蛋白结合
甲因走私武器被判处15年有期徒刑,剥夺政治权利5年;因组织他人偷越国境被判处14年有期徒刑,并处没收财产5万元,剥夺政治权利3年;因骗取出口退税被判处10年有期徒刑,并处罚金20万元。关于数罪并罚,下列哪一选项符合《刑法》规定?(2012年卷二12题)
()属于质量保证资料范畴。
某公司承包了一条单跨城市隧道,隧道长度800m,跨度15m,地质条件复杂。设计采用浅埋暗挖法进行施工,其中支护结构由建设单位直接分包给一家专业施工单位。施工准备阶段,某公司项目部建立了现场管理体系,设置了组织机构,确立了项目经理的岗位职责和工作程序;在暗
银行间债券市场的交易制度不包括()。
“业精于勤荒于嬉,行成于思毁于随。”下列选项对这句话的理解不正确的是()。
一、注意事项1.申论考试是对考生阅读理解能力、综合分析能力、提出和解决问题能力以及文字表达能力的测试。2.作答参考时限:阅读资料40分钟,作答110分钟。3.仔细阅读给定的资料,按照后面提出的“作答要求”依次作答。二、给定资料
Intheeyesofvisitorsfromtheoutsideworld______.Familiesinfrontiersettlementsusedtoentertainstrangers______.
最新回复
(
0
)