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

    【计算机类职业资格】二级VISUAL+BASIC机试-20及答案解析.doc

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

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

    【计算机类职业资格】二级VISUAL+BASIC机试-20及答案解析.doc

    1、二级 VISUAL+BASIC 机试-20 及答案解析(总分:100.00,做题时间:90 分钟)一、1 基本操作题(总题数:1,分数:30.00)1.注意:下面出现的“”均为 c:/wexam/25160001。请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上建立一个名称为 Cmd1,标题为“显示”的命令按钮,编写适当的事件过程。程序运行后,如果单击“显示”命令按钮,则在窗体上显示“等级考试”,如图 6-1 所示。程序中不能使用任何变量,直接显示字符串。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt1.frm,工

    2、程文件名为 sjt1.vbp。图 6-1 图 6-2(2)在名称为 Form1 的窗体上建立一个名称为 L1 的标签,两个名称为 Cmd1 和 Cmd2,标题分别为“显示1”和“显示 2”的命令按钮。编写适当的事件过程,要求程序运行后,如果单击“显示 1”命令按钮,则在标签上显示字符串“aaa”;如果单击“显示 2”命令按钮,则在标签上显示字符串“bbb”。程序中不能使用任何变量,直接显示字符串。如图 6-2 所示。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt2.frm,工程文件名为 sjt2.vbp。(分数:30.00)_二、2 简单应用题(总题数:1,分数:40.00)2.注意

    3、:下面出现的“考生文件夹”均为 c:/wexam/25160001。(1)在窗体上建立一个名称为 Text1 的文本框,然后建立两个主菜单,其标题分别为“商品类别”和“帮助”,名称分别为 vbMenu 和 vbHelp,其中“商品类别”菜单包括“百货”、“食品”和“家电”三个子菜单,名称分别为 vbMenu1、vbMenu2 和 vbMenu3。程序运行后,如果在“商品类别”的下拉菜单中选择“百货”,则在文本框内显示“大类核算”;如果选择“食品”,则在文本框内显示“中类核算”;如果选择“家电”,则在文本框内显示“小类核算”。程序中不能使用任何变量,直接显示字符串。程序运行界面如图 6-3 所示

    4、。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt3.frm,工程文件名为 sjt3.vbp。(分数:40.00)_三、3 综合应用题(总题数:1,分数:30.00)3.下面出现的“考生文件夹”均为 c:/wexam/25160001。在考生文件夹中有工程文件 sjt5.vbp 及其窗体文件 sjt5.frm,该程序是不完整的,请在有? 号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为 Form1 的窗体上有一个文本框,名称为 Text1,MultiLine 属性为 True,ScrollBars 属性为 2:

    5、两个命令按钮名称分别为 Cmd1 和 Cmd2,标题分别为“读入数据”和“计算保存”,如图 6-5 所示。要求程序运行后,如果单击“读入数据”按钮,则读入“in.txt”文件中的 100 个整数,放入个数组中 (数组下界为 1),同时在文本框中显示出来:如果单击“计算保存”按钮,则计算其中前 50 个数之和,并把求和结果在文本框 Text1 中显示出来,同时把结果存入考生文件夹中的文件“out.txt”中。 (在考生的文件夹下有标准模块 mode.bas,其中的 putdata 过程可以把结果存入指定的文件)。注意:文件必须存放在考生文件夹下,窗体文件名为 sjt5.frm,工程文件名为 sj

    6、t5.vbp,计算结果存入out.txt 文件,否则没有成绩。(分数:30.00)_二级 VISUAL+BASIC 机试-20 答案解析(总分:100.00,做题时间:90 分钟)一、1 基本操作题(总题数:1,分数:30.00)1.注意:下面出现的“”均为 c:/wexam/25160001。请根据以下各小题的要求设计 Visual Basic 应用程序(包括界面和代码)。(1)在名称为 Forml 的窗体上建立一个名称为 Cmd1,标题为“显示”的命令按钮,编写适当的事件过程。程序运行后,如果单击“显示”命令按钮,则在窗体上显示“等级考试”,如图 6-1 所示。程序中不能使用任何变量,直接

    7、显示字符串。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt1.frm,工程文件名为 sjt1.vbp。图 6-1 图 6-2(2)在名称为 Form1 的窗体上建立一个名称为 L1 的标签,两个名称为 Cmd1 和 Cmd2,标题分别为“显示1”和“显示 2”的命令按钮。编写适当的事件过程,要求程序运行后,如果单击“显示 1”命令按钮,则在标签上显示字符串“aaa”;如果单击“显示 2”命令按钮,则在标签上显示字符串“bbb”。程序中不能使用任何变量,直接显示字符串。如图 6-2 所示。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt2.frm,工程文件名为 sjt2.vbp

    8、。(分数:30.00)_正确答案:(解析 在窗体上建立好控件后,先设置控件属性,再编写事件过程。命令按钮的标题通过 Caption 属性设置,单击命令按钮触发 Click 事件;在窗体上打印显示内容使用Print 方法。解题步骤:第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表 6-1。*第二步:编写程序代码。参考代码:Private Sub Cmd1_Click()Print“等级考试”End Sub第三步:调试并运行程序。第四步:按题目要求存盘。(2)解析 在窗体上建立好控件后,先设置控件属性,再编写事件过程。命令按钮的标题由 Caption 属性设置,单击命令按钮触发 Cli

    9、ck 事件;标签上显示的内容通过 Caption 属性设置。解题步骤:第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表 6-2。*第二步:编写程序代码。参考代码:Private Sub Cmd1_Click()L1.Caption=“aaa“End SubPrivate Sub Cmd2_Click()L1.Caption=“bbb“End Sub第三步:调试并运行程序。第四步:按题目要求存盘。答案考生文件夹)解析:二、2 简单应用题(总题数:1,分数:40.00)2.注意:下面出现的“考生文件夹”均为 c:/wexam/25160001。(1)在窗体上建立一个名称为 Text1

    10、的文本框,然后建立两个主菜单,其标题分别为“商品类别”和“帮助”,名称分别为 vbMenu 和 vbHelp,其中“商品类别”菜单包括“百货”、“食品”和“家电”三个子菜单,名称分别为 vbMenu1、vbMenu2 和 vbMenu3。程序运行后,如果在“商品类别”的下拉菜单中选择“百货”,则在文本框内显示“大类核算”;如果选择“食品”,则在文本框内显示“中类核算”;如果选择“家电”,则在文本框内显示“小类核算”。程序中不能使用任何变量,直接显示字符串。程序运行界面如图 6-3 所示。注意:保存时必须存放在考生文件夹下,窗体文件名为 sjt3.frm,工程文件名为 sjt3.vbp。(分数:

    11、40.00)_正确答案:(解析 在窗体上建立好控件后,先设置控件属性,再编写事件过程。在 Visual Basic 中,菜单也被看作控件,具有属性和事件。菜单的建立在菜单编辑器中完成,菜单的级数通过内缩符号来表示,第一级菜单没有内缩符号,第二级菜单的内缩符号为 1:文本框的内容由 Text属性设置。解题步骤:第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表 6-3。*第二步:编写程序代码。参考代码:Private Sub vbMenu1_Click()Text1.Text=“大类核算“End SubPrivate Sub vbMenu2_Click()Text1.Text=“中类核

    12、算“End SubPrivate Sub vbMenu3_Click()Text1.Text=“小类核算“End Sub第三步:调试并运行程序。第四步:按题目要求存盘。(2)解析 在窗体上建立好控件后,先设置控件属性,再编写事件过程。在 Visual Basic 中,复选按钮的标题由 Caption 属性设置,Value 属性用来表示复选框的状态,复选框的 Value 属性有 0、 1 或 2 三种取值,其作用为:0:表示未选中;1:表示选中该复选框;2:表示该复选框被禁止(灰色)。解题步骤:第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表 6-4。*第二步:编写程序代码。程序提供

    13、的代码:Option ExplicitPrivate Sub Form_Click()Text1.Text = “If Ch1.Value = ? ThenText1.Text = Text1.Text + “英语班“End IfIf Ch2.Value ThenIf Text1.Text “ Then Text1.Text = ? + “和“Text1.Text = Text1.Text + “计算机班“End IfIf Text1.Text “ ThenText1.Text = “报名参加“ + Text1.TextEnd IfEnd Sub参考代码:Option ExplicitPriv

    14、ate Sub Form_Click()Text1.Text = “If Ch1.Value = 1 ThenText1.Text = Text1.Text + “英语班“End IfIf Ch2.Value ThenIf Text1.Text “ Then Text1.Text = Text1.Text + “和“Text1.Text = Text1.Text + “计算机班“End IfIf Textl.Text “ ThenText1.Text = “报名参加“ + Text1.TextEnd IfEnd Sub第三步:调试并运行程序。第四步:按题目要求存盘。)解析:三、3 综合应用题(

    15、总题数:1,分数:30.00)3.下面出现的“考生文件夹”均为 c:/wexam/25160001。在考生文件夹中有工程文件 sjt5.vbp 及其窗体文件 sjt5.frm,该程序是不完整的,请在有? 号的地方填入正确内容,然后删除?及所有注释符(即号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下:在名称为 Form1 的窗体上有一个文本框,名称为 Text1,MultiLine 属性为 True,ScrollBars 属性为 2:两个命令按钮名称分别为 Cmd1 和 Cmd2,标题分别为“读入数据”和“计算保存”,如图 6-5 所示。要求程序运行后,如果单击“读入数据”按

    16、钮,则读入“in.txt”文件中的 100 个整数,放入个数组中 (数组下界为 1),同时在文本框中显示出来:如果单击“计算保存”按钮,则计算其中前 50 个数之和,并把求和结果在文本框 Text1 中显示出来,同时把结果存入考生文件夹中的文件“out.txt”中。 (在考生的文件夹下有标准模块 mode.bas,其中的 putdata 过程可以把结果存入指定的文件)。注意:文件必须存放在考生文件夹下,窗体文件名为 sjt5.frm,工程文件名为 sjt5.vbp,计算结果存入out.txt 文件,否则没有成绩。(分数:30.00)_正确答案:(解析 在窗体上建立好控件后,先设置控件属性,再编

    17、写事件过程。文本框显示的内容由 Text 属性设置,Multiline 属性决定文本框是否可多行显示;按钮的标题由 Caption属性设置,单击命令按钮触发 Click 事件。题中涉及到文件的操作,读入顺序文件以顺序的方式打开,用input#语句读取数据。另外需要注意的是对文件操作完后,一定要关闭文件。解题步骤:第一步:建立界面并设置控件属性。程序中用到的控件及其属性值见表 6-5。* 第二步:编写程序代码。程序提供的代码。mode.bas 代码:Option ExplicitSub putdata(t_FileName As String,t_Str As Variant)Dim sFile

    18、 As StringsFile=“/“ & t_FileNameOpen App.Path & sFile For Output As #1Print #1,t_StrClose #1End Sub窗体代码:Option ExplicitDim ?(1 To 100) As IntegerPrivate Sub Cmd1_Click()Dim j As IntegerOpen App. Path& “/in.txt“ For Input As #1For j = 1 To 100Input #1, i(j)Text1.Text = Text1.Text & i(j) & Space(5)Nex

    19、tClose #1End SubPrivate Sub Cmd2_Click()Dim ? As IntegerDim temp As LongFor j = 1 To 50temp = temp + i(j)NextTextl.? = tempputdata “out.txt“, tempEnd Sub参考代码:Option ExplicitDim i(1 To 100) As IntegerPrivate Sub Cmd1_Click()Dim j As IntegerOpen App. Path & “/in.txt“ For Input As #1For j = 1 To 100Input #1, i(j)Text1.Text = Text1.Text & i(j) & Space(5)NextClose #1End SubPrivate Sub Cmd2_Click()Dim j As IntegerDim temp As LongFor j = 1 To 50temp = temp + i(j)NextText1.Text = tempputdata “out.txt“, tempEnd Sub第三步:调试并运行程序。第四步:按题目要求存盘。)解析:


    注意事项

    本文(【计算机类职业资格】二级VISUAL+BASIC机试-20及答案解析.doc)为本站会员(fatcommittee260)主动上传,麦多课文档分享仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知麦多课文档分享(点击联系客服),我们立即给予删除!




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

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

    收起
    展开