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

加入VIP,免费下载
 

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

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

下载须知

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

版权提示 | 免责声明

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

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

1、国家二级 VB机试(上机操作)模拟试卷 49及答案与解析 一、基本操作题 0 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 1 在名称为 Form1的窗体上画出如图 3-48所示的三角形。下表给出了直线 Line1、Line2的坐标值,请按此表画 Line1、 Line2,并画出直线 Line3,从而组成如图 3-48所示的三角形。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sjt1 vbp,窗体文件名为 sjt1 frm。 2 在名称为: Form1的窗体上画一个名称为 List1的列表框,并任意输入若干列表项;再画一个名称为 Text1的文本

2、框,无初始内容。请编写 List1和 Text1的 Click事件过程。程序运行后,如果单击列表框中的某一项,则在文本框中显示该项相应的顺序号,若单击第一项,则在文本框中显示 1;若单击第二项,则在文本框中显示 2,以此类推 (如图 3-49所示 );如果单击文本框,则把该列表项的内容显示在文本框中。 注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为 sjt2 vbp,窗体文件名为 sjt2 frm。 二、简单应用题 3 在考生目录下有一个工程文件 sjt3 vbp,有两个名称分别为 Form1和 Form2的窗体, Form1为启动窗体,程序

3、执行时 Form2不显示。 Form1中有菜单 (如图 3-50(a)所示 ),程序运行时,若单击 “格式 ”菜单项,则显示 Form2窗体 (如图 3-50(b)所示 ),选中一种字号和字体后单击 “确定 ”按钮,则可改变 Form1上文本框的字号和字体,并使 Form2窗体消失。若单击 “退出 ”菜单项,则结束程序的运行。 文件中已经给出了所有控件和程序,但程序不完整,要求: 1)利用属性窗口设置适当的属性,使 Form1窗体标题栏右上角的最大化按钮、最小化按钮消失 (如图 3-50(a)所示 ); 2)利用属性窗口把 Form2窗体的标题设置为 “格式 ”(如图 3-50(b)所示 );

4、 3)请去掉程序中的注释符,把程序中的 ?改为正确的内容。 注意:不能修改程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存盘。 4 在考生目录下有一个工程文件 sjt4 vbp,包含了所有控件和部分程序。程序运行时,请按以下顺序操作: 1)单击 “读入数据 ”按钮,可把考生目录下的文件 in4 dat中的 100个整数读到数组 a中; 2)从名称为 Comb01的组合框中选中一项 (如图 3-51所示 )。 3)单击 “计算 ”按钮,则可按该选项的要求对 a中的数计算平均值 (四舍五入取整或截尾取整 )并放到文本框中。 4)单击窗体右上角的关闭按钮结束程序。 “读入数据 ”按钮

5、的 Click事件过程已经给出,请为 “计算 ”按钮编写适当的事件过程实现上述功能。 提示:存放前 n个数之和的变量应使用 Long类型。 注意:不得修改已经存在的程序,在结束程序运行之前,必须进行一次计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。 三、综合应用题 5 在考生目录下有一个工程文件 sjt5 vbp。窗体左边的图片框名称为 Picture1,框中还有六个小图片框,它们是一个数组,名称为 Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为 Picture2、 Picture3、 Picture4,还有一个文本框 Text1以及四个标

6、签,如图 3-52(a)所示。 程序运行时,可以用鼠标拖拽的方法把右边的物品放到左边的图片框中 (右边的物品不动 ),同时把该物品的价格累加到 Text1中,如图 3-52(b)所示。最多可放六个物品。 实现此功能的 方法是:程序刚运行时, Picture1中的图片框数组不显示,当拖拽一次物品时,就显示一个图片框数组元素,并在该图片框数组元素中加载相应的图片,产生物品被放入的效果。 文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的 ?改为正确的内容。 注意:不得修改已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。 国家二级 VB机试(上机操作)模拟试卷

7、 49答案与解析 一、基本操作题 1 【正确答案】 审题分析 本题只需按要求画出控件并设置相关属性即可。 操作步骤 步骤 1:新建一 个 “标准 EXE”工程,按表 4-29在窗体中画出控件并设置其相关属性。 步骤 2:按要求将文件保存至考生文件夹中。 考点链接 图形控件。 2 【正确答案】 审题分析 列表框的 Listlndex可用于设置或返回在列表框中当前选择项目的索引号,该索引号是从 0开始的。要实现本题所要求的功能,应在列表框的单击事件中,令文本框中的内容等于列表框的 Listlndex属性加 1;在文本框的单击事件中,令文本框 的内容等于列表框的对应选中项的内容,即List1 Lis

8、t(List1 ListIndex)。 操作步骤 步骤 1:新建一个 “标准 EXE”工程,按表4-30在窗体中画出控件并设置其相关属性。 步骤 2:打开代码编辑窗口,编写列表框和文本框的单击事件过程。 参考代码: Private Sub List1_Click() Text1 Text=List1 ListIndex+1 End Sub Private Sub Text1_Click() Text1 Text=List1 List(List1 ListIndex) End Sub 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 选择控件。 二、简单应用题 3 【正确答案】 审题分析 根

9、据题目要求,单击 “格式 ”菜单项即会显示。 Form2,则在该菜单项的单击事件中应该调用 Form2 Show方法;在 “确定 ”按钮的单击事件中,应该对应将文本框中内容的字体和字号设置为列表框中选中的项并隐藏Forrn2。 操作步骤 步骤 1:打开考生文件夹中的本题工程文件 sjt3 vbp,按表 4-31在窗体中画出控件并设置其相关属性。 步骤 2:在代码编辑窗口,去掉程序中的注释 符 “”,将问号 “?”改为正确的内容。 参考代码: Form2 Show Form1 Text1 FontSize=List1 Text Form1 Text1 FontName = List2 List(

10、List2 ListIndex) Form2 Visible=False 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 多窗体、字体与字形、选择控件、菜单。 4 【正确答案】 审题分析 本题是一个简单的累加求和再求平均值的问题,根据在组合框中选择的列表项不同,进行计算的项数也不同,但都是 用循环完成,在循环中实现累加,在循环后实现求平均值,区别只在于循环的次数不一样。 操作步骤 步骤 1:打开考生文件夹中的本题工程文件 sjt4 vbp,双击 “计算 ”按钮,打开代码编辑窗口编辑计算按钮的单击事件。 参考代码: Private Sub Command2_Click() Dim i, j

11、 As Long If Combo1 Text=“前 50个数 “Then j=0 For i=1 To 50 j=j+a(i) Next j=Round(j 50, 0) Text1 Text=j End If If Combo1 Text=“前 80个数 “Then 1=0 For i=1 To 80 j=j+a(i) Next j=Round(j 80, 0) Text1 Text=j End If If Combo1 Text=“所有数 “Then j=0 For i=1 To 100 j=j+a(i) Next j=Round(j 100, 0) Text1 Text=j End I

12、f End Sub 步骤 2:按要求将文件保存至考生文件夹中。 步骤 3:运行程序,单击 “读入数据 ”按钮,然后在列表框中选中一项,并单击“计算 ”按钮获得一个结果,然后使用窗体右上角的 “关闭 “按钮结束程序。 考点链接 数组定义与操作、 If选择结构、 For循环结构。 三、综合应用题 5 【正确答案】 审题分析 控件的 DragDrop事件有三个主要参数,其中, “Source”参数是一个对象 变量,类型为 “Contro1”,包含被拖动对象的属性, “X”和 “Y”参数是放下对象时鼠标光标的位置。本题中为了判断拖动的是哪一个图片,因此需要判断 Source参数的 Name属性。当拖动

13、的图片确定,则在控件数组中显示的图片以及需要累加的价格也随之确定。 由于控件数组共有 6个数组元素,因此应该在拖放事件中进行一个 6次的循环,在每次循环中判断数组元素是否已经被显示出来,如果没有被显示出来则令其Visible属性为 True,然后退出循环,这样可以实现序号由小到大每次显示一个图片的效果。 操作步骤 步骤 1:打开考生文件夹下的工程文件 sjt5 vbp。 步骤 2:在代码编辑窗口中,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: Select Case Source Name For k=0 To 5 If Pic(k) Visible=False Then Pic(k) Visible=True Text1=Text1+a 步骤 3:按要求将文件保存至考生文件夹中。 考点链接 控件数组、多分支结构、鼠标 光标和鼠标拖放。

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