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

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

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

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

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

    1、二级 VISUAL+BASIC 机试-11 及答案解析(总分:100.00,做题时间:90 分钟)1.在考生文件夹内(C:/ylc)有一个工程文件 ylc.vbp。在窗体上有一个文本框,名字为 Text1,以及两个命令按钮,名字分别为 Command1 和 Command2,标题分别为 Search 和 Save。还有一个函数过程 Search(a),在程序中可以直接调用该函数,其功能为判断整型参数 number 是否为质数。如果是则返回 True,否则返回 False。编写一个事件过程,实现以下功能:运行时,在文本框内输入一个正整数。单击 Search 按钮后,找到小于该正整数的第一个素数,

    2、显示在 Text1 中;单击“Save”,则把 Text1 中的计算结果存入考生文件夹下的 out.txt 文件中。程序运行后如图 27 所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为 ylc.vbp。(分数:100.00)_二级 VISUAL+BASIC 机试-11 答案解析(总分:100.00,做题时间:90 分钟)1.在考生文件夹内(C:/ylc)有一个工程文件 ylc.vbp。在窗体上有一个文本框,名字为 Text1,以及两个命令按钮,名字分别为 Command1 和 Command2,标题分别为 Search 和 Save。还有一个函数过程 Search(a)

    3、,在程序中可以直接调用该函数,其功能为判断整型参数 number 是否为质数。如果是则返回 True,否则返回 False。编写一个事件过程,实现以下功能:运行时,在文本框内输入一个正整数。单击 Search 按钮后,找到小于该正整数的第一个素数,显示在 Text1 中;单击“Save”,则把 Text1 中的计算结果存入考生文件夹下的 out.txt 文件中。程序运行后如图 27 所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为 ylc.vbp。(分数:100.00)_正确答案:(在工具箱中选择命令按钮控件,在窗体上创建两个命令按钮,名称分别为 Command1 和Co

    4、mmand2,标题分别为 Search 和 Save。(2)双击 Search 按钮弹出代码窗口,在其中添加如下代码:Private Sub Command1_Click()Dim a As Integernumber=Val(Text1. Text)Do While (Search(number)=False)number=number-1LoopText1.Text=numberEnd Sub(3)双击“Save”按钮弹出代码窗口,在其中添加如下代码:Private Sub Command2_Click()Call savedata(“out.txt“, CInt(Text1.Text)E

    5、nd SubSub savedata(filename As String, number As Integer)Open App. Path & “/“ & filename For Output As #1Print #1, numberClose #1End Sub(4)按 F5 键运行程序。如图 27 所示。(5)执行“文件”“保存工程”命令,将工程文件命名为 ylc.vbp,窗体文件命名为 ylc.frm。)解析:解析 (1)该题答案第 4 部分中的代码调用了原始文件中的 Search 函数过程。当函数判断得到第一个质数时就会跳出 Do 循环体,并将该质数值赋给文本框的 Text 属性,显示在文本框中。(2)第 5 部分中编写了一个用于向文件 out.txt 写入数据的过程,并在 Save 按钮的单击事件中调用了这个过程。


    注意事项

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




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

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

    收起
    展开