首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上面有两个名称分别为Text1、Text2的义本框,其中Textl可多行显示。请画两个名称为Commandl、Command2,标题为“产生数组”、“查找”的命令按钮。如图2.216所示。程序功能如下:
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上面有两个名称分别为Text1、Text2的义本框,其中Textl可多行显示。请画两个名称为Commandl、Command2,标题为“产生数组”、“查找”的命令按钮。如图2.216所示。程序功能如下:
admin
2019-03-14
33
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上面有两个名称分别为Text1、Text2的义本框,其中Textl可多行显示。请画两个名称为Commandl、Command2,标题为“产生数组”、“查找”的命令按钮。如图2.216所示。程序功能如下:
①单击“产生数组”按钮,则用随机函数生成10个0~100之间(不含0和100)互不相同的数值,并将它们保存到一维数组a中,同时也将这10个数值显示在Text1文本框内;
②单击“查找”按钮将弹出输入对话框,接收用户输入的任意一个数,并在一维数组a中查找该数,若查找失败。则在Text2文本框内显示该数“不存在于数组中”;否则显示该数在数组中的位置。
要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改窗体文件中已经存在的控件和程序。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在窗体上画两个命令按钮,属性及其值如表3.114所示。 [*] 步骤2:在代码编辑窗口,去掉程序中的注释符“”,将问号“?”改为正确的内容。 参考代码: a(i)=Fix(Rnd*99+1) For j=1 To i—1 i=i一1 If a(i)=num Then If i>10 Then 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/EYm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于鼠标拖放操作的叙述中错误的是
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是( )。
下面程序的功能是输出100以内所有素数:PrivateSubCommand1_Click()Forn=2To100isprime=Truek=2DoWhilek
下列关于栈的叙述中,正确的是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()DimhumAsInteger,xAsIntegernum:Val(InputBox(“请输入一个正整数”))Selec
数据库设计过程不包括
下列说法中,错误的是
已知二叉树后序遍历序列是CDABE,中序遍历序列是CADEB,它的前序遍历序列是()。
在考生文件夹下有一个工程文件sjt4.vbp。在其窗体中“待选城市”下的List1列表框中有若干个城市名称。程序运行时,选中List1中若干个列表项,如图3-138(a)所示,单击“选中”按钮则把选中的项目移到List2中;单击“显示”按钮,则在Text1
某二叉树共有150个结点,其中有50个度为1的结点,则()。
随机试题
下列属于担保合同的是( )。
以下关于净现值率的说法不正确的是()。
政策性银行是政府设立,贯彻执行国家产业政策、区域发展政策的金融机构,以营利为目的,并同时靠财政拨款和发行金融债务获得资金。()
()中国古建筑体系的成熟时期。
小峰的爸爸因为打架伤人而被判刑入狱,母亲离家出走,把小峰扔给了仅靠微薄的退休金生活且年老体弱的爷爷奶奶。班主任老师发现小峰最近常闷闷不乐,神情恍惚,希望学校社会工作者小朱给予帮助。当小朱第一时间第一次与小峰见面时,针对此类服务对象的特性,他应采取的恰当表达
下列关于神经兴奋的叙述。错误的是()。
数据结构化是数据库系统与文件系统的本质区别之一。()
抗日战争开始后,王明回到国内,主张抗日民族统一战线中“一切经过统一战线”,“一切服从统一战线”,放弃党对统一战线的领导权,其错误实质是
Writeanessayof160-200wordsbasedonthefollowingpicture.Inyouressay,youshould1)describethepicturebriefly,
为某个应用而用不同高级语言编写的程序模块经分别编译产生(15),再经过(16)处理后形成可执行程序。
最新回复
(
0
)