首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上画有两个名称分别为Text1、Text2的文本框,其中Text1可多行显示。请画两个名称为Command1、Command2,标题为“产生数组”、“查找”的命令按钮。如图8所示。程序功能如下: ①单击“
admin
2017-06-22
20
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
在二维表中,元组的【】不能再分成更小的数据项。
设A=2,B=-4,则表达式3*A>5orB+8>0的值是______。
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOutputAs#1Fori=1To8_
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。SubCommand1_Click()DimstudentAsstudtypeDimrecord_noAsInteger
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:optionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)
如果文本框的Locked属性设置为True,则下列说法正确的是()。
对序列(70,75,82,90,23,16)用快速排序方法进行排序,以序列的第一个元素为划分的基准。在第一趟划分后数据元素的排列是()。
可以通过()的方法来输出一个二维数组中的各个元素。
Print方法可以输出多个表达式,若使用标准格式输出,各表达式的分隔符应是______。
设A="12345678",则表达式Val(Left(A,4)+Mid(A,4,2))的值为()。
随机试题
低容量性低钠血症也称为
绿色注重的是解决人与自然的和谐问题。人类发展活动必须尊重自然、顺应自然、保护自然,否则就会遭到大自然的报复,这个规律谁也无法抗拒。绿色发展,就是要()
背景资料:某房地产开发公司与某施工单位签订了一份价款为1000万元的建筑工程施工合同,合同工期为7个月。工程价款约定如下:(1)工程预付款为合同价的10%;(2)工程预付款扣回的时间及比例:自工程款(不含工程预付款)支付至合同价款的60%后,开始从
机械除锈中动力工具处理效率高于手工工具,但是无法将()的锈和污染物处理干净。
在下列哪种情况下,可导致脂肪肝的发生?_______。
下列肺部病变中需要适当减少曝光条件的是
(2008年)阅读下列FORTRAN程序:DIMENSIONM(6)READ(*,*)MDO10J=1,6D010K=J,6IF(M(K).LTM(J)THENN=M(K
银行承兑汇票的出票人于汇票到期日未能足额交存票款的,承兑银行可以向持票人拒绝付款。()
心理学成为一门独立的学科是以德国学者冯特()年在莱比锡大学建立了世界上第一个心理实验室为标志的。
为虎添翼:如虎添翼
最新回复
(
0
)