首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.Vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击
在考生文件夹下有一个工程文件sjt5.Vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击
admin
2020-06-30
32
问题
在考生文件夹下有一个工程文件sjt5.Vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下:
①单击“产生数组”按钮,则用随机函数生成10个0~100之间(不含0和100)互不相同的数值,并将它们保存到一维数组a中,同时也将这10个数值显示在Text1文本框内;
②单击“查找”按钮将弹出输入对话框,接收用户输入的任意一个数,并在一维数组a中查找该数,若查找失败,则在Text2文本框内显示该数“不存在于数组中”;否则显示该数在数组中的位置。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在窗体上画两个命令按钮,属性及其值如表12—6所示。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: a(i)=Fix(Rnd*99+1) For j=1 To i—-1 i=i-1 If a(i)=num Then If i>10Then。
解析
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文本框内显示该数“不存在于数组中”。
转载请注明原文地址:https://jikaoti.com/ti/qSS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下过程定义中正确的过程首行是
设X为一整型变量,且语句的开始为:SelectCasex,则不符合语法规则的Case子句是
在窗体上画一个命令按钮和两个标签,其名称分别为Commandl、Labell和Labe12,然后编写如下事件过程:PrivateSubCommandl_Click()a=0Fori=1To10a=a+1:b=0Forj=1
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是
假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。
在标准模块中,将a定义为全局整型变量的语句是
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
软件设计中模块划分应遵循的准则是
随机试题
实际形象
男,41岁。脑占位行开颅切除术,术后行脑室引流,有关护理不恰当的是
A、幼年期B、青春期C、性成熟期D、更年期E、老年期从月经初潮到生殖器官发育成熟的时期,称为
脑膜瘤多起源于
下列行为中,属于招标人违法行为的有()。[2015年真题]
将扣缴所得税对应的工资项目改为应发合计。(用户名777唐琳,密码777,账套:中华机械制造公司账套【110】,操作日期2014年12月01日)
中国共产党代表着广大人民群众的利益并处于执政地位,是中国社会主义社会的最显著标志。()
adulting
下列关于通用对话框CommonDialogl的叙述中,错误的是
Theabilitytochangewiththetimeisthekeytobeingsuccessfulinthefastpacedworldofthe21stcentury.Life,afterall,
最新回复
(
0
)