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

    【计算机类职业资格】VB机试-试卷83及答案解析.doc

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

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

    【计算机类职业资格】VB机试-试卷83及答案解析.doc

    1、VB 机试-试卷 83 及答案解析(总分:12.00,做题时间:90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_2.(1)在窗体 Forml 上画一个命令按钮,名称为 Command1,标题为“打开文件”,在窗体上添加适当的控件并编写适当的程序代码,要求程序运行时,单击“打开文件”命令按钮,可以弹出“打开文件”对话框。程序运行时的窗体界面如图 51 所示。 注意:保存时必须存放在考生文件夹下,窗体文件名为sj1frm,工程文件名为 sj1.vbp。 (2)在窗体 Forml 上画一个列表框,名称为 List1,有“Item1”、“Item2”、“I

    2、tera3”和“Item4”4 个表项。要求编写适当的程序代码,当双击列表中某一项时,弹出一个对话框提示“是否删除”。对话框中只有“是”与“否”两个选择按钮,单击按钮,则继续当前的操作。程序运行时的窗体界面如图 52 所示。 (分数:2.00)_二、简单应用题(总题数:2,分数:4.00)3.简单应用题()(分数:2.00)_4.(1)在考生文件夹下有一个工程文件 sj3vbp,窗体上有两个单选按钮,标题为“Iteml”和“Item2”;两个标题分别为“按钮 1”和“按钮 2”的命令按钮,如图 70-3 所示。程序的功能是:运行时如果选中单选按钮“Iteml”后,“按钮 1”可用,“按钮 2”

    3、不可用;如果选中单选按钮 Item2 后,则相反,单击可用按钮,在窗口上打印该按钮的标题。 注意:设初始选中的是“Iteml”;去掉程序中的注释符“”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sj4vbp,相应的窗体文件为 sj4.frm,在窗体上有一个命令按钮和两个文本框。程序运行后,单击计算按钮,即可计算出大于 Text1 中输入的数且能被 3、5 和 7 同时整除的最小整数并在文本框 Text2 中显示出来,如图70 一 4 所示。在窗体的代码窗口中,已

    4、给出了部分程序。 (分数:2.00)_三、综合应用题(总题数:2,分数:4.00)5.综合应用题()(分数:2.00)_6.在考生文件夹下有一个工程文件 sj5vbp,相应的窗体文件为 sj5frm,此外在考生文件夹下还有一个名为 in5txt 的文本文件,其内容如下: 10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34 程序运行后,双击窗体,将把文件 in5txt 中的数据输人到二维数组 Arr 中,在窗体上按 5 行5 列的矩阵形式显示出来,并在其下显示该矩阵左上一右下对角线的右上部分。在窗体

    5、的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并使之能正确运行。程序运行效果如图 2-5 所示。(分数:2.00)_VB 机试-试卷 83 答案解析(总分:12.00,做题时间:90 分钟)一、基本操作题(总题数:2,分数:4.00)1.基本操作题()(分数:2.00)_解析:2.(1)在窗体 Forml 上画一个命令按钮,名称为 Command1,标题为“打开文件”,在窗体上添加适当的控件并编写适当的程序代码,要求程序运行时,单击“打开文件”命令按钮,可以弹出“打开文件”对话框。程序运行时的窗体界面如图 51 所示。 注意:保存时必须存放在考生文件夹下,窗体文件名为sj1f

    6、rm,工程文件名为 sj1.vbp。 (2)在窗体 Forml 上画一个列表框,名称为 List1,有“Item1”、“Item2”、“Itera3”和“Item4”4 个表项。要求编写适当的程序代码,当双击列表中某一项时,弹出一个对话框提示“是否删除”。对话框中只有“是”与“否”两个选择按钮,单击按钮,则继续当前的操作。程序运行时的窗体界面如图 52 所示。 (分数:2.00)_正确答案:(正确答案: (1)通用对话框(CommonDialog)提供诸如打开文件、保存文件、设置打印选项、选择颜色、设置字体、显示帮助等操作的一组标准对话框,通用对话框显示这对话框对应的方法分别为ShowOpen

    7、、ShowSave、ShowPrinter、ShowColor、ShowFont、ShowHelp。该控件运行时不可见。通用对话框的 Action 属性也可用于设置被打开对话框的类型。 根据题意,新建“标准 EXE”工程,一个命令按钮和一个文件对话框控件添加到窗体中,CommonDialog 控件需要选择“工程”“部件”命令,或在左侧工箱中单击鼠标右键,选择“部件”菜单,打开“部件”对话框,将 Microsoft Common Dialog Control 60 前面的复选按钮勾上,单击“确定”按钮,则添加成功,再同其他控件一样添加到窗体上,其名称为 CommonDialogl。 命令按钮的名

    8、称为 Commandl、CaptiOn 属性为“打开文件”。双击 Commandl 进入代码窗口,编写如下代码: Private Sub Commandl_Click() CommonDialoglShowOpen打开CommonDialog End Sub 单击 按钮运行程序,并按要求保存。 (2)MsgBox()函数用于显示提示信息,并可返回一个代表用户点击了哪个按钮的 Integer 类型值,其常用语法为:MsgBox(prompt,buttons,title)。其中,prompt 参数为消息框的提示信息;buttons 参数用于控制消息框中按钮的数目、形式及消息框图标的样式;title

    9、 参数为消息框标题栏上显示的内容。 根据题意,新建“标准 EXE”工程,将一个 List 控件添加到窗体中,其名称为 Listl、List 属性中添加“heml”、“Item2”、“Itern3”和“Item4”。双击 Listl 进入代码编写窗口补充后的代码如下: Private Sub Listl DblClick() Dim a AS Integer a=MsgBox(“是否删除“,vbYesNo) 弹出提示对话框 If a=6 Then6 表示选择“是“ ListlRemovehem ListlListlndex删除选中项 End If End Sub 单击 )解析:二、简单应用题(总

    10、题数:2,分数:4.00)3.简单应用题()(分数:2.00)_解析:4.(1)在考生文件夹下有一个工程文件 sj3vbp,窗体上有两个单选按钮,标题为“Iteml”和“Item2”;两个标题分别为“按钮 1”和“按钮 2”的命令按钮,如图 70-3 所示。程序的功能是:运行时如果选中单选按钮“Iteml”后,“按钮 1”可用,“按钮 2”不可用;如果选中单选按钮 Item2 后,则相反,单击可用按钮,在窗口上打印该按钮的标题。 注意:设初始选中的是“Iteml”;去掉程序中的注释符“”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最

    11、后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sj4vbp,相应的窗体文件为 sj4.frm,在窗体上有一个命令按钮和两个文本框。程序运行后,单击计算按钮,即可计算出大于 Text1 中输入的数且能被 3、5 和 7 同时整除的最小整数并在文本框 Text2 中显示出来,如图70 一 4 所示。在窗体的代码窗口中,已给出了部分程序。 (分数:2.00)_正确答案:(正确答案:(1)本题主要考查命令按钮的属性设置及单选按钮的单击事件,补充后的代码如下:Private Sub Commandl_Click() CIs Print“按钮 1“ 显示“按钮 1“ End Sub

    12、 Private Sub Command2_Click() Cls Print“按钮 2“显示“按钮 2“ End Sub Private Sub Form_Load() Commandl Enabled =True按钮 1 可用 Command2 Enabled =False按钮 2 不可用 End Sub Private Sub Optionl Click() Commandl Enabled =True Command2 Enabled =False End Sub Private Sub Option2_Click() Commandl Enabled =False按钮 1 不可用 C

    13、ommand2 Enabled =True按钮 2 可用 End Sub 单击 按钮运行程序,并按要求保存。 (2)要判断一个数能否被另一个数整除,要用到Mod 函数,当余数为 0 表示能被整除,否则不能被整除。本题使用了 WhileWend 循环,且条件中要使三个条件都满足,要用 And 运算符。补充后的代码如下: Private Sub Commandl_Click() Dim a As Integer a=Val(Textl Text ) While Not(a Mod 3=0 And a Mod 5=0 And a Mod 7=0) 当 a 不能同时被 3、5、7 整除时进入 Whil

    14、e 循环 a=a + 1 a 逐渐加 1 Wend Text2Text=a在 Text2 中显示结果 End Sub 单击 )解析:三、综合应用题(总题数:2,分数:4.00)5.综合应用题()(分数:2.00)_解析:6.在考生文件夹下有一个工程文件 sj5vbp,相应的窗体文件为 sj5frm,此外在考生文件夹下还有一个名为 in5txt 的文本文件,其内容如下: 10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34 程序运行后,双击窗体,将把文件 in5txt 中的数据输人到二维数组 Arr

    15、中,在窗体上按 5 行5 列的矩阵形式显示出来,并在其下显示该矩阵左上一右下对角线的右上部分。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并使之能正确运行。程序运行效果如图 2-5 所示。(分数:2.00)_正确答案:(正确答案: 本题重点考查二重 For 循环和二维数组的使用。根据题意,将两个文本框控件和两个标签控件添加到窗体中,文本框的名称分别为 Textl 和 Text2、Text 属性都为空,Textl 的MultiLine 属性为 True、ScrollBar 属性为 2、标签的 Caption 属性分别为“矩阵如下:”和“矩阵的右上半部:”。设置完成后,双

    16、击 Form 进入代码编写窗口,在其 DblClick 事件中补充如下代码: Private Sub Form_DblClick() Dim str AS String Dim tmp As String Dim i As Integer Dim j As IntegeT Dim ArT(5,5)As Integer定义二维数组 str=“ Open“AppPath&in5txt“For Input As#1 打开文件准备读取 For i=1 To 5第一层 For 循环代表数组的行读取 For j=1 To 5 第二层 For 循环代表数组的列读取 Input#1 ,Arr(i,j) 将读取

    17、到的数放人数组中 str=str+CStr(Arr(i,J)+“ 将数组写入字符串中 Next j str=str+vbCrLf 每读完一行则添加换行字符串 Next i Close#1 关闭文件 tmp=“ For i=1 To 5 For 循环读取数组对角线的右上部分 For j=1 To 5 If j=i Then当该数是矩阵的左下部分时 tmp=tmp+“+“ 加入空格 Else当该数是矩阵的右上部分时 tmp=tnlp+CStr(Arr(i,J)+“ 将读取到的数据写人字符串 End If Next j tmp=tmp+vbCrLf Next i Textl Text str在 Textl 中显示数组 Text2 Text =tmp在 Text2 中显示数组右上部分 End Sub 单击 )解析:


    注意事项

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




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

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

    收起
    展开