欢迎来到麦多课文档分享! | 帮助中心 海量文档,免费浏览,给你所需,享你所想!
麦多课文档分享
全部分类
  • 标准规范>
  • 教学课件>
  • 考试资料>
  • 办公文档>
  • 学术论文>
  • 行业资料>
  • 易语言源码>
  • ImageVerifierCode 换一换
    首页 麦多课文档分享 > 资源分类 > DOC文档下载
    分享到微信 分享到微博 分享到QQ空间

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

    • 资源ID:499619       资源大小:125KB        全文页数:6页
    • 资源格式: DOC        下载积分:2000积分
    快捷下载 游客一键下载
    账号登录下载
    微信登录下载
    二维码
    微信扫一扫登录
    下载资源需要2000积分(如需开发票,请勿充值!)
    邮箱/手机:
    温馨提示:
    如需开发票,请勿充值!快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
    如需开发票,请勿充值!如填写123,账号就是123,密码也是123。
    支付方式: 支付宝扫码支付    微信扫码支付   
    验证码:   换一换

    加入VIP,交流精品资源
     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

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

    1、国家二级 VB机试(上机操作)模拟试卷 218及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 visual Basic应用程序 (包括界而和代码 )。 (1)在名称为 Forml、标题为 “标签 ”的窗体上画一个名称为 Labell的标签,并设置适当属性以满足以下要求: 标签的内容为 “计算机等级考试 ”; 标签可根据显示内容自动调整其大小; 标签带有边框,且标签内容显示为三号字。 运行后的窗体如图2 68所示。 注意:存盘时必须存放在考尘文件夹下,工程文件名为 sjtl vbp,窗体文件名为 sjtl frm。 (2)在名称为 Forml的窗体上画一个名称为 Hscrolll的

    2、水甲滚动条,其刻度范围为 1 100;再画一个名称为 Text1的文本框,初始内容为 1。程序开始运行时,焦点在滚动条上。请编写适当的事件过程,使得程序运行时,文奉框中实时显示滚动框的当前位置。运行情况如图 2 69所示。 注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。 存盘时必须存放在考生文件夹下,工程文件名为 sit2 vbp,窗体文件名为 sit2 frm。二、简单应用题 2 (1)在考牛目录下有一个工程文件 sit3 vbp,有两个名称分别为 Forml和 Form2的窗体, Forml为启动窗体,程序执行时 Form2不显示。 Forml中有菜单 (如图2 50(a)所

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

    4、程序中的其他部分和其他控件的属性。最后把修改后的文件按原文件名存盘。 (2)在考生目录下有一个工程文件 sjt4 vbp,包含了所有控件和部分程序。程序运行时,请按以下顺序操作: 1)单击 “读入数据 ”按钮,可把考生目录下的文件 in4 dat中的 100个整数读到数组 a中: 2)从名称为 Combol的组合框中选中一项 (如图 2 51所示 )。 3)甲击 “计算 ”按钮,则可按该选项的要求对 a中的数计算平均值 (四舍五入取整或截尾取整 )并放到文本框中。 4)单击窗体右上角的关闭按钮结束程序。 “读入数据 ”按钮的Click事件过程已经给出,请为 “计算 ”按钮编写适当的事什过程实现

    5、上述功能。 提示:存放前 n个数之和的变量应使用 Long类型。注意:不得修改已经存在的程序,在结束程序运行之前,必须进行一次计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。三、综合应用题 3 在考生目录下有一个工程义件 sit5 vbp,其 窗体如图 2 221所示。考生目录下有一个 in5 dat文件,文件中有 5个运动员的姓名、 7个裁判的打分和动作的难度系数。每人的数据占一行,顺序足:姓名、 7个分数、难度系数。程序运行时,单击 “输入 ”按钮,可把 in5 dat文件中的 5个姓名读入数组 athlete中,把 5组得分(每组 7个 )和难度系数读入

    6、二维数组 a中 (每行的最后一个元素是难度系数 ),并把这些数据显示在 Text1文本框中;单击 “选出冠军 ”按钳,则把冠军的姓名和成绩分别显示在文本框 Text2、 Text3中。成绩的计算方法是:去掉一个最高分和一个最低分,求 剩下得分的平均分,乘以 3再乘以难度系数;单击 “存盘 ”按钮,则把冠军姓名和成绩存入考生目录下的 out5 dat文件中。 要求:去掉程序中的注释符,把程序中的 ?改为正确的内容 (程序中 getmark函数的功能是计算并返回第 n个运动员的最后得分 ),并编写 “选出冠军 ”按钮的 Click事件过程。 注意:不得修改已经存在的程序和控件的属性,在结束程序运行

    7、前,必须用 “存盘 ”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。国家二级 VB机试(上机操作)模拟试卷 218答案与解析 一、基本操作题 1 【正确答案】 第 l小题 【操作步骤】 步骤 1:新建一个 “标准 EXE”工程,在窗体 Form1中画一个标签,并设置它的相关属性,其属性和值如表 3-40所示。步骤 2:按要求将文件保存至考生文件夹中。第 2小题【操作步骤】步骤 1:新建一个 “标准 EXE”工程,存窗体 Form1中画一个文本框和一个水平滚动条,在属性设置窗口中设置其相关属性,其属件及值如表 3 41所示。步骤 2:打开代码编辑窗口,编写水平滚动条的 Change事件

    8、过程。 参考代码: Private Sub HScrolll_Change() Textl Text=HScr0111 Value End Sub 步骤 3:按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 sjt3 vbp,按表 3 31在窗体中画出控件并设置其相关属性。步骤 2:在代码编辑窗口,去掉程序中的注释符一 ”,将问号 “?”改为正确的内容。 参考代码: Form2 ShOW Form1 Textl FontSize; Listl Text Forml Textl FontName=List2 L

    9、ist(List2 LiStIndex) Form2 Visible=False 步骤3:按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1:打开考生文件夹中的本题工程文件 sit4 vbp,双击 “计算 ”按钮,打开代码编辑窗口编辑计算按钮的单击事件。 参考代码: Private Sub Command2一 Click() Dim i, j As Long If Combol 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 Combol Te

    10、xt=“前 80个数 ”Then j=0 For i=1 To 80 j = j +a(i) Next j =Round(j 80, 0) Textl Text=j End If If Combol Text=”所有数 ”Then j=0 For i=1 TO 100 j=j+a(i) Next j=Round(j 100, 0) Textl Text=j End If End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤 3:运行程序,单击 “读入数据 ”按钮。然后在列表框中选中一项,并单击 “计算 ”按钮获得一个结果,然后使用窗体右 二角的 “关闭 ”按钮结束程序。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1:打开考生文件中的本题工程文件 sjt5 vbp,在代码编辑窗口,去掉程序中的注释符 “”,将问号 “?”改为正确的内容。 参考代码: S=a(n, 1) For k=2 To 7 getmark=S*3*a(n, 8) Private Sub Command2 C1ick() 要求考生编写的 程序 Dim k As Integer maxmark=getmark(1) m=1 For k=2 To 5 If maxmark键键运行程序,先单击 “读 入 ”按钮,然后单击 “选出冠军 ”按钮,最后单击 “存盘 ”按钮。


    注意事项

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




    关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

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

    收起
    展开