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

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

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

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

基本操作题

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

(1)在名称为Form1的窗体上画一个名称为Shape1的形状控件,要求在属性窗口中将其形状设置为椭圆,其长轴(水平方向)、短轴(垂直方向)的长度分别为1600、800。把窗体的标题改为“Shape控件”,窗体上没有最大化按钮、最小化按钮。程序运行后的窗体如图1-197所示。

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

(2)在名称为Form1的窗体上画一个名称为HS的水平滚动条,最大值为100,最小值为1。再画一个名称为List1的列表框,在属性窗口中输入列表项的值,分别是1000、1500、2000,如图1-198所示。请编写适当的程序,使得运行程序时,当选择列表框中的某一项,将水平滚动条的长度改变为所选中的值。

第1小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个形状控件,其相关属性设置如表2-95所示。

[*]

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

第2小题

【操作步骤】

步骤1:新建一个“标准EXE”工程,在窗体 Form1中加入一个列表框和一个水平滚动条,其相关属性设置如表2-96所示。

[*]

步骤2:打开代码编辑窗口,编写列表框的Click

事件过程:

MaxButton

参考代码:

Private Sub List1_Click()

HS.Width = List1.Text

End Sub

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

解析:

简单应用题

2.(1)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Text1中输入一个不超过10的正整数,然后选择“N的阶乘 ”或“(N+2)的阶乘”单选按钮,即可进行计算,计算结果显示在文本框Text2中,如图1-199所示。

在给出的窗体文件中已经添加了全部控件,但程序不完整。

要求:去掉程序中的注释符,把程序中的?改为正确的内容。

注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

(2)在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt 中的文本读出并显示在文本框Text1中。在文本框Text2中输入一个英文字母,然后单击“统计”按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果显示在标签Label3中,如图1-200所示。给出的窗体文件中已经有了全部控件,程序不完整。

第1小题

【操作步骤】

步骤1:打开考生文件夹下的本题工程文件 sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。

参考代码:

Select Case Index

Text2.Text = f1(n)

Text2.Text = f1(n + 2)

For i = 1 To n

f1 = x

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

第2小题

【操作步骤】

步骤1:打开考生文件中的本题工程文件sjt4.vbp,打开代码编辑窗口,去掉程序中的注释符“ ”,将问号“?”改为正确的内容。

参考代码:

p = InStr(s, s1)

Loop While p <> 0

Label3.Caption = n

Text1.Text = s

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

解析:

综合应用题

3.在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图1-201所示。有一个函数过程 isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。

【操作步骤】

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

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

参考代码:

Private Sub C1_Click()

sjt4.vbp,

a% = 18000

Do

a% = a% – 1

Loop Until isprime(a%)

Text1.Text = a%

End Sub

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

参考代码:

Private Sub C2_Click()

Open \\

解析:

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

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

推荐资源

客服

扫码添加客服微信

热线

官方客服

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

电话客服:

客服微信:pujinet

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

公众号

扫码关注微信公众号