ImageVerifierCode 换一换
格式:DOC , 页数:6 ,大小:118.50KB ,
资源ID:499905      下载积分:2000 积分
快捷下载
登录下载
邮箱/手机:
温馨提示:
如需开发票,请勿充值!快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
如填写123,账号就是123,密码也是123。
特别说明:
请自助下载,系统不会自动发送文件的哦; 如果您已付费,想二次下载,请登录后访问:我的下载记录
支付方式: 支付宝扫码支付 微信扫码支付   
注意:如需开发票,请勿充值!
验证码:   换一换

加入VIP,免费下载
 

温馨提示:由于个人手机设置不同,如果发现不能下载,请复制以下地址【http://www.mydoc123.com/d-499905.html】到电脑端继续下载(重复下载不扣费)。

已注册用户请登录:
账号:
密码:
验证码:   换一换
  忘记密码?
三方登录: 微信登录  

下载须知

1: 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。
2: 试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。
3: 文件的所有权益归上传用户所有。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 本站仅提供交流平台,并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

版权提示 | 免责声明

本文([计算机类试卷]国家二级VB机试(上机操作)模拟试卷64及答案与解析.doc)为本站会员(李朗)主动上传,麦多课文库仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知麦多课文库(发送邮件至master@mydoc123.com或直接QQ联系客服),我们立即给予删除!

[计算机类试卷]国家二级VB机试(上机操作)模拟试卷64及答案与解析.doc

1、国家二级 VB机试(上机操作)模拟试卷 64及答案与解析 一、基本操作题 0 请根据以下各小题的要求设计 visual Basic应用程序 (包括界面和代码 )。 1 在名称为 Form1的窗体上画两个名称分别为 Frame1、 Frame2的框架,标题分别为 “字号 ”、 “修饰 ”;在 Frame1中画两个单选按钮,名称分别为 Option1、Option2,标题分别为 “10号字 ”、 “20号字 ”,且标题显示在单选按钮的左边;在Frame2中画一个名称为 Check1的复选框,标题为 “下划线 ”。运行后的窗体如图 3-120所示。 注意:存盘时必须存放在考生文件夹下,工程文件名为

2、sjt1 vbp,窗体文件名为 sjt1 frm。 2 在名称为。 Form1的窗体上从上到下画两个文本框,名称分别为 Text1、 Text2;再画一个命令按钮,名称为 Command1,标题为 “选中字符数是 ”。程序运行时,在Text1中输入若干字符,选中部分内容后,单击 “选中字符数是 ”按钮,则在 Text2中显示选中的字符个数 (如图 3-121所示 )。请编写按钮的 Click事件过程。 要求:程序中不得使用变量,事件过程中只能写一条语句。注意:存盘时必须存放在考生 文件夹下,工程文件名为 sjt2 vbp,窗体文件名为 sjt2 frm。 二、简单应用题 3 在考生文件夹下有一

3、个工程文件 sjt3 vbp。程序运行后,单击 “读入数据 ”按钮,可把考生文件夹下 in3 txt文件中的所有英文单词读入,并显示在 Text1文本框中;单击 “插入列表框 ”按钮,则按顺序把每个单词作为一项添加到 List1列表框中(如图 3-122所示 )。在 in3 txt文件中每个单词之间用一个空格字符隔开,最后一个单词的后面没有空格。已经给出了所有控件和程序,但程序不完整。 要求:请去掉程序中的注释符, 把程序中的 ?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。 4 在考生文件夹下有一个工程文件 sjt4 vbp,

4、窗体上已经画出所有控件,如图 3-123所示。在运行时,如果单击 “开始 ”按钮,则窗体上的汽车图标每 0 1秒向右移动一次 (初始状态下不移动 );如果单击 “停止 ”按钮,则停止移动。 请完成以下工作: 设置适当控件的适当属性,使得汽车图标每 0 1秒向右移动一次,而初始状态下不移动; 请去掉程序中的注释符,把程序中的 ?改为正确的内容; 为 两个命令按钮编写适当的事件过程。最后以原文件名存盘。 注意:不得修改已经给出的程序。编写的事件过程中不能使用变量,每个事件过程中只能有一条语句。 三、综合应用题 5 在考生文件夹下有一个工程文件 sjt5 vbp。在窗体文件中已经给出了全部控件及部分

5、程序。程序运行时,在文本框 Text1中输入一个大于 2的偶数,并单击 “分解为 ”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数 (一个偶数有时可以分解为多种素数的组合,例如 24可以分解为5和 19,也可以分解为 11和 13,要求取 含有最小素数的组合,如图 3-124所示 )。要求编写 “分解为 ”按钮事件过程中 “考生编写程序开始 ”和 “考生编写程序结束 ”之间的代码,以实现上述功能。过程 IsPrime用来判断一个数是否为素数,如果是,返回值为 True,否则返回值为 False。 注意:不得修改原有程序和控件的属性。至少正确运行一次程序,且

6、运行时在文本框中输入23456,单击 “分解为 ”按钮,将结果显示在标签中,否则无成绩。最后把修改后的文件按原文件名存盘。 国家二级 VB机试(上机操作)模拟试卷 64答案与解析 一、基本操作题 1 【正确答案 】 审题分析 本题只需按题目在窗体中画出控件,并设置相关属性即可。 操作步骤 步骤 1:新建一个 “标准 EXE”工程,按要求画出控件并设置属性。 步骤 2:按要求将文件保存至考生文件夹中。 考点链接 框架、焦点和 Tab顺序、选择控件。 2 【正确答案】 审题分析 要在 Text2中显示 Text1中选中的字符个数,需编写语句将 Text1的 SelLength属性返回值赋值给 Te

7、xt2。 操作步骤 步骤 1:新建一个 “标准 EXE”工程,按要求画出控 件并设置属性, 步骤 2:打开代码编辑窗口,编写以下事件过程: 参考代码: Private Sub Command1_Click() Text2 Text=Forrn1 Text1 SelLength End Sub 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 文本控件。 二、简单应用题 3 【正确答案】 审题分析 本题在 “读入数据 ”按钮的单击事件中,首先将 in3 txt文件以 Input方 式打开,然后利用 Do循环依次读入文件中的每一个数据,在每一次循环中读入文件中的一个数据并连接至变量 st中,循

8、环结束后 st的值就是文件中所有单词连接而成的字符串。 在 “插入列表框 ”按钮的单击事件中,以空格为单词分隔依据找出每个单词,然后将单词插入列表框中,清空变量 word准备继续寻找下一个单词。 操作步骤 步骤 1:打开考生文件夹下的工程文件 sjt3 vbp,打开代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: st=st ch c=Mid(st, k, 1) WOrd=“ “ 步骤 2:按要求将文件保存至考生文件夹中。 考点链接 Do循环和 While循环、常用内部函数。 4 【正确答案】 审题分析 计时器只在设计时可见,计时器是否启用由其 Enabled

9、属性设置,值可取 True或 False。启用后由 Interval属性设置间隔多长时间触发一次其 Timer事件, Interval属性的单位为毫秒,缺省值为 0,此时计时器不启用。 Timer1用于控制汽车行驶,每触发一次 Timer1的 timer事 件,汽车向右移动20,即 P1 Move P1 Left+20。 操作步骤 步骤 1:打开考生文件夹中的本题工程文件 sjt4 vbp,将计时器 timer1的Enabled属性设置为 False, Interval属性设置为 100。 步骤 2:打开代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容并编写两个命令按钮的单

10、击事件过程。 参考代码: Private Sub C1_Click() Timer1 Enabled=True End Sub Private Sub C2_Click() Timer1 Enabled=False End Sub Private Sub Timer1_Timer() P1 Move P1 Left+20 End Sub 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 计时器。 三、综合应用题 5 【正确答案】 审题分析 本题程序设计思路:两个整数之和为 n的组合有: 1和 n-1、 2和 n-2i 和 n-i,在 For循环中按前一个加数由小到 大的顺序,依次通过调用函

11、数 IsPrime来判断每个组合中的两个加数是否均为素数,第一个找到的素数组合中即含有能够分解出的最小素数。由于 1不是素数,故循环变量的初值从 2开始;由于 i和 n-i的组合与n-i和 i组合在本题中可被视为相同组合,故循环变量的终值设定为 n 2即可。 操作步骤 步骤 1:打开考生文件夹中的本题工程文件 sjt5 vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: Dim i As Integer Dim n As Integer n=Val(Text1 Text) If n Mod 20 Then MsgBox“请输入偶数 !“ Exit Sub End If For i=2 To n 2 If IsPrime(i) And IsPrime(ni) Then Label1 CaDtion=i Label2 CaDtion=ni Exit For End If Next 步骤 2:按 键运行程序,在文本框中输入 23456,单击 “分解为 ”按钮 。 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 For循环结构、 Sub过程和函数过程。

copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
备案/许可证编号:苏ICP备17064731号-1