首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Text2,
考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Text2,
admin
2019-06-11
82
问题
考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为Text2,其初始内容为空的文本框,如图3-95所示。程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in3.dat文件中已按升序排列的30个整数读入一维数组a中,并同时显示在Text1文本框内;
②单击“查找”按钮,将弹出输入框接收用户输入的任意一个偶数,若接收的数为奇数,则提示重新输入。如果接收的偶数超出一维数组a的数值范围,则无须进行相应查找工作,直接在Text2内给出结果;否则,在一维数组a中查找该数,并根据查找结果在Text2文本框内显示相应信息。命令按钮的Click事件过程已给出,但“查找”按钮的Click事件过程不完整,请将其中的注释符去掉,把?改为正确的内容,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,最后程序按原文件名存盘。
选项
答案
审题分析 在“查找”按钮的单击事件中,首先使用变量num接收输入框的值,然后判断num是否为偶数,如果为奇数(num/2◇Fix(num/2))则提示错误信息;由于数组a是升序排列的,因此如果num的值小于a(1)或者大于a(30)则意味着超出范围;接下来使用For循环遍历整个数组,如果某次循环中数组元素等于num的值则意味着找到,可以退出循环;当循环结束后如果n的值大于30则表明循环是正常结束的,没有找到这个元素。 操作步骤 步骤1:打开考生文件夹下的工程文件sjt3.vbp,打开代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: If num/2<>Fix(num/2)Then If num<a(1) Or num>a(30) Then If a(n)=num Then If n>30 Then 步骤2:按要求将文件保存至考生文件夹中。 考点链接 If选择结构、数组定义与操作。
解析
转载请注明原文地址:https://kaotiyun.com/show/mAUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面不属于软件工程的3个要素是
下列数组定义中错误的是
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsInteger:bAsIntegerEndTypePrivateSubCommand1_Click()
在标准模块中用Public关键字定义的变量,其作用域为
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"Close#2EndSub
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是
设有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20:y=2:f=x*yEndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是
冒泡排序在最坏情况下的比较次数是
随机试题
世界上第一所护士学校的创办时间和创办人是()
下列下颌骨骨折的好发部位中,发生比率最低的是
婴幼儿易患上呼吸道感染主要是由以下原因所致,但应除外
对未列入《检验检疫机构实施检验检疫的进出境商品目录》的必须实施标识查验的纺织品,海关凭( )验放。
代理的法律特征包括()。
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性。()
用FLASH制作一个小球从舞台左侧移动到舞台右侧的动画时出现了错误,时间轴如下图,则可能存在的操作问题是()。
命令SELECT0的功能是
C"estunedictéepleinede______.
PolitebehaviorisimportantintheAustraliansociety."Please"and"thankyou"arewordswhichareveryhelpfulwhen【C1】_____
最新回复
(
0
)