首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
admin
2017-06-22
36
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
在程序运行期间,增加和删除列表框(或组合框)的方法是Addltem和【】。
下列函数调用时弹出的对话框中按钮的个数为【】。MsgBox("程序非法!",vbAbortRetryIgnore,"消息提示:")
在窗体上画一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框。当改变当前驱动器时,目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中,这个事件过程是______。
有下列二叉树,对此二叉树前序遍历的结果是()。
下列说法正确的是
排序是计算机程序设计中的一种重要操作,常见的拌序方法有插入排序、______和选择排序。
在链表的运算过程中,能够使空表与非空表的运算统一的结构是______。
设a=2,b=3,c=4,下列表达式的值是______。Nota<=cOr4*c=b^2Andb<>a+C
某二叉树共有60个叶子结点与50个度为1的结点,则该二叉树中的总结点数为()。
随机试题
关于羊膜带综合征描述,错误的是
混凝土坝坝基所受的扬压力通常包括()。
下列关于模拟启动试验结果要求的说法不正确的是()。
中国公民刘某为某国有企业职员,2015年10月距离法定退休年龄尚有1年零6个月的刘某办理了提前退休手续,取得一次性补贴收入90000元。刘某该项补贴收入应缴纳个人所得税()元。
C公司生产中使用甲零件,全年共需耗用3600件,该零件既可自行制造也可外购取得。如果自制,单位制造成本为10元,每次生产准备成本34.375元,每日生产量32件。如果外购,购入单价为9.8元,从发出定单到货物到达需要10天时间,一次订
(2016年)人民法院于2015年11月5日受理了债权人提出的针对A公司的破产申请。法院向A公司送达受理裁定,并要求其在15日内提交财产状况说明、债务清册、债权清册等有关资料,A公司以企业管理不善、资料保存不全为由拒绝。管理人在调查债务人财产状况时发现下
________是目前世界上发现的青铜器中最大的一件。
党的十八届四中全会通过的《决定》指出,全面推进依法治国,总目标是()。
蛹:蝶
A、Hehashadthirteendecayedteeth.B、Hedoesn’thaveasingledecayedtooth.C、Hehasfewerdecayedteeththanotherpeopleof
最新回复
(
0
)