首页 > 全部 > 二级VB > 国家二级VB机试(上机操作)模拟试卷474

国家二级VB机试(上机操作)模拟试卷474

本单篇文档共2975字,内容预览3600字,预览为有答案版,源文件无水印,下载后包含无答案空白卷版和有答案版,同时也有计算机类NCRE全国计算机二级整科真题模拟题,讲义课件,思维导图,易错高频题等下载。
二级VB 章节练习 3664人下载
价格: 2.00 原价:¥9.00
收藏

国家二级VB机试(上机操作)模拟试卷474

基本操作题

1.请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上添加一个计时器控件,名称为Timer1。请利用属性窗口设置适当属性,使得在运行时可以每隔1秒,调用计时器的Timer事件过程一次。另外,请把窗体的标题设置为“题目2”。设计阶段的窗体如图3-73所示。

注意:保存时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。

(2)在名称为Form1的窗体上画一个文本框,名称为Text1,无初始内容;再画一个图片框,名称为P1。请编写适当的事件过程,使得在运行时,在文本框中每输入一个字符,就在图片框中输出一行文本框中的完整内容,运行时的窗体如图3-74所示。程序中不能使用任何变量。

第1小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,如表4-45在窗体中画出控件并设置其相关属性。

[*]

步骤2:按要求将文件保存至考生文件夹中。

第2小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,如表4-46在窗体中画出控件并设置其相关属性。

[*]

步骤2:打开代码编辑窗口,编写命令按钮的单击事件过程。参考代码:

Private Sub Text1_Change( )

P1.Print Text1.Text

End Suub

步骤3:按要求将文件保存至考生文件夹中。

解析:

简单应用题

2.(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个单选按钮数组,含三个单选按钮,均没有标题,请利用属性窗口,为单选按钮依次添加标题为“北京”、“上海”、“广州”;再添加一个标题为“显示”的命令按钮,如图3-75所示。程序的功能是在运行时,如果选中一个单选按钮后,单击“显示”按钮,则根据单选按钮的选中情况,在窗体上显示“我的出生地是北京”、“我的出生地是上海”或“我的出生地是广州”。

要求:①依次添加单选按钮标题为“北京”、“上海”、“广州”;设初始选中的是“上海”,添加命令按钮标题为“显示”。②去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的其他属性。最后把修改后的文件按原文件名存盘。

(2)在考生目录下有一个工程文件sjt4.vbp,请在Form1窗体中画三个标签,名称分别为B1、B2、L1,标题分别为“字号”、“字体”、“计算机等级考试”,其中L1的高为500,宽为3000;再在B1、B2标签的下面画两个组合框,名称分别为Cb1、Cb2,并为Cb1添加项目:“10”、“15”、“20”,为Cb2添加项目:“黑体”、“隶书”、“宋体”。请编写适当的事件过程,使得在运行时,当在Cb1中选一种字号、Cb2中选一种字体时,标签L1中的文字立即变为选定的字号和字体。如图3-76所示。

第1小题

【操作步骤】

步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,依次选中窗体中的各单选按钮和命令按钮,设置它们的相关属性,其属性及值如表4-47所示。

[*]

步骤2:双击“显示”命令按钮,打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码:

Private Sub C1_Click( )

For i=0 To 2

If Op1(i).Value=True Then

Print\\

解析:

综合应用题

3.在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-77所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击“计算”按钮,则找出大于15000的第一个素数,并显示在Text1中;单击“存盘”按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。

【操作步骤】

步骤1:打开本题对应工程文件sjt5.vbp。

步骤2:双击窗体Form1上的“计算”按钮,打开代码编辑窗口,在其Click事件过程中输入如下代码。参考代码:

Private Sub Cl_Click( )

a%=15000

Do

a%=a%+1

Loop Until isprime(a%)

Text1.Text=a%

End Sub

步骤3:双击窗体Form1上的“存盘”按钮,在代码编辑窗口其Click事件过程中输入如下代码。参考代码:

Private Sub C2 Click( )

Open App.Path &\\

解析:

本文档预览:3600字符,共2975字符,源文件无水印,下载后包含无答案版和有答案版,查看完整word版点下载

剩余未完,查看全文
收藏
国家二级VB机试(上机操作)模拟试卷474

推荐资源

客服

扫码添加客服微信

热线

官方客服

如遇问题,请联系客服为您解决

电话客服:

客服微信:pujinet

工作时间:9:00-18:00,节假日休息

公众号

扫码关注微信公众号