国家二级VB机试（上机操作）模拟试卷30

国家二级VB机试（上机操作）模拟试卷

第1套

一、基本操作题（本题共2题，每题1.0分，共2分。）

1、请在名称为Forml的窗体上添加一个名称为H1的水平滚动条，并在属性窗口

中设置它的属性值，使其满足下列要求：它的最小刻度值为1,最大刻度值为

100,在程序运行时，用鼠标单击滚动条上滚动框以外的区域（不包括两边按钮），

滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分

别显示1和100,运行时的窗体如图所示。注意：存盘时必须存放在考生文件夹

下，工程文件名为sjtl.vbp,窗体文件名为sjtl.frmo

标准答案：［操作步骤］步骤1：打开VisualBasic开发环境，按照题目的要求新建

窗体并添加一个水平滚动条控件，如图3.1所示。

图3・1步骤2：在属性窗

口中，按照题目的要求没置水平滚动条的相关属性，如图3.2所示。

图3.2步骤3：按照题目的

要求，在窗体上添加两个标签控件，如图3.3所示。

冬工.inv^umti：,：，’.：>­?,

。■

I»

S:

G“o

nn

/

。9

：

图3.3步骤4：按照

题目的要求设置两个标签的相关属性，如图3.4所示。

图3・4程序中用到的控件及属性

表3.1

控件滚高条械符1标整2

Large-

属性NameMinMaxNameCaption\.irncCaption

Change

•值Hl110010LI1L2上一步骤5：按

见表3.1。

F键盘上的F5键运行程序，程序运行后的窗体界面如图3.5所示。

图3・5步骤6：按题目要求保存工程和窗体，如图3.6

所示。图3.6

知识点解析：暂无解析

2、在名称为FormI的窗体上添加两个名称分别为lextl和Tcxt2的文本框，初始内

容均为空；再建立一个下拉菜单，菜单标题为“操作”，名称为Ml,此菜单下含有

两个菜单项，名称分别为Copy和Clear,标题分别为“复制”、“清除”，请编写适当

的事件过程，使得在程序运行时，单击“复制”选项菜单，则把Textl中的内容复制

到Texl2中，单击“清除”选项菜单，则清除Text2中的内容（即在Texl2中填入空字

符串）。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程

中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为

日Forml

口|---------------；---1

i一颜植

sjt2.vbp,窗体文件名为sjt2,frmo

标准答案：|操作步骤|步骤1：新建窗体，按表3.2建立菜单项并设置其属性,

表3.2

标题操作复制清除

名称—MlCopyClear

内编符号011

o

如图3.7所示。图3.7步

骤2：同步骤1,输入第3项的标题和名称，单击确定即可。步骤3：添加文本框

控件，按表3.3设置文本框的属性。

写程序代码，如图3.8所示。

......bBiMBOB*

M(D«BQOxae«Ka>MWMbzikD*M*A)

A

-

图3・8参考代码Private

SubClearClick()Text2.Text=""EndSubPrivatesubCopy_Click()

Text2.Text=Textl.TextEndSub步骤5：调成并运行程最关闭程序后按题目要

求存盘。

知识点解析：暂无解析

二、简单应用题（本题共2题，每题7.0分，共2分0）

3、在考生文件夹下有一个工程文件sjl3.vbp,窗体上已经有一个标签Label1,请

添加一个单选按钮数组，名称为Opl,含三个单选按钮，它们的Index属性分别为

0、1、2,标题依次为“飞机”、“火车”、“汽车”,再添加一个名称为Textl的文本

框。窗体文件中已经给出了Opl的Click事件过程，但不完整，要求去掉程序中的

注释符，把程序中的?改为正确的内容，使得在程序运行时单击“飞机”或“火车”单

选按钮时，在Textl中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮

时，在Textl中显示“我开汽车去”，如图所示。注意：不能修改程序中的其他部

标准答案：I操作步骤］步骤1:打开本题工程文件，按照题目要求建立单选按纽数

组，如图3.9所示。图3.9步骤2：按照题目要

求建立其他控件并设置其属性，见表3.4。

豪3.4

单选单通单选

文本福

按钮1按钮2按住3

GiplionIndexCaptionIndexCaptionIndexName

飞机0火车1汽车2Textl

步骤3：打开代码编辑窗口，去

掉程序中的注释符将问号改为正确的内容。参考代码(画下划线部分是需填入

的内容)privateSubOpl_Click(IndexAsInteger)DimaAsString,bAsString,cAs

Stringa="我坐"b="我开"SelectcaseIndex通过Index值决定响应哪一个控件数组

Case0Textl.Text=a+Me.Opl.(0).Caption+"i"Case1

Textl.Text=a+Me.Opl(l).Caption+“去“当Index值为1时,选择“我坐“Case2

Textl.Text=b+Me.Op1(2).Caption+"去"EndSelectEndSub步骤4：调试并运行

程序，关闭程序后按题目要求存盘。

知识点解析：暂无解析

4、在考生文件夹下有一个工程文件sjt4.vbp,Forml窗体中有一个文本框，名称

为Textl；请先在窗体上添加两个框架控件，名称分别为Fl、F2,标题分别为“性

别”、“身份”；然后在F1中添加两个单选按钮控件Opl、Op2,标题分别为“男”、

“女”：其次在F2中添加两个单选按钮控件Op3、Op4.,标题分别为“学生”、“教

师”；最后再添加一个命令按钮，名称为C1,标题为“确定”，如图所示。请编写适

当的事件过程，使得运行时，在Fl、F2中各选一个单选按钮，然后单击“确定”按

钮，就可以按照下表把结果显示在文本框中。

性别身份在文本椎中显示的内容

男学生我是男学生

男教牌我是男教师

女学生我是女学生

女教师我是女教师

最后把修改后的文件以

原来的文件名存盘。注意：考生不得修改窗体文件中已经存在的程序和Textl的

属性，在结束程序运行之前，必须进行能够产生上表中一个结果的操作。必须用窗

体右上角的关闭按钮结束程序，否则无成绩。

标准答案：|操作步骤|步骤1：打开本题工程文件，按照题目要求建立框架控件并

设置其属性，如图3.10所示。

口

图3.10步骤2：按照步

骤1建立其他控件并设置相关属性，程序中用到的控件及属性见表3.5和表

表3.5

控件框架1框架2命令按钮

—

网性NameCaptionNameCaptionNameCaption

设置值Fl性别F2身份Cl确定

*3.6

控件单选按钮1单选按钮2单选按钮3单选按钮4

属性NameCaptionNameCaplion、呼CaptionNamrCaption

后生1

设置值Opl男0p2女0p30p4

3.6«步骤3：打开代

码编辑窗口，在指定位置编写如下代码。参考代码PrivateSubClClick。

Textl.Text="我是"，首先确定不论选什么情况Textl的内容一定以“我是“开头If

Opl.ValueThenTextl.Tcxt=Tcxtl.Tcxt&Opl.CaptionElse

Textl.Text=Textl.Text&Op2.CaptionEndIP通过单选按钮的Value值（选择为

true,否则为false）确认性别,最后把其Caption值接至Textl后If0p3.Value

ThenTextl.Text=Textl.Text&Op3.CaptionElseTextl.Text=Textl.Text&

Op4.CaptionEndIP确认身份，思路同上EndSub步骤4：调试并运行程序，关闭

程序后按题目要求存盘。

知识点解析：暂无解析

三、综合应用题（本题共7题，每题7.0分，共［分0）

5、以下数列：1,1,2,3,5,8,13,21…的规律是从第3个数开始，每个数都

是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbpo窗体中已经给

出了所有控件，如图所示。请编写适当的事件过程完成如下功能：选中一个单选按

钮后，单击“计算”按钮，则计算出上述数列第n项的值，并在文本框中显示，n是

选中的单选按钮后面的数值（提示：因计算结果较大，应使用长整型变量）。注意：

不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一

个单选按钮，并单击“计算”按钮以获得一个结果；必须使用窗体右上角的关闭按钮

结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。

标准答案：|操作步骤|步骤1：打开本题工程文件。步骤2：打开代码编辑窗口，

在指定位置编写如下代码。参考代码PrivatesubCommandl_Click()Dima()AsLong

DimiAsIntegerDimnAsInteger，Opl.Count是单选按钮数目，这里用的是控件数

组Fori=0T。0Pl.Count—1，判断哪一项被选择，把它后面的数值赋给n,确定n

值IfOpl(i).Value=TrueThenn=Val(Opl(i).Caption)ExitForEndIfNextReDim

a(n)，重新申请空间，这里是动态申请a(l)=la(2尸1，数列第一项、第二项值确定For

i=3Tona(i)=a(i-1)+a(i-2)*JS一项值是前两项值之和NextTextl.Text=a(n)EndSub

步骤3：调试并运行程序，关闭程序后按题目要求存盘。

知识点解析：暂无解析

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

第2套

一、基本操作题(本题共1题，每题1.0分，共/分。)

1、(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条，并在属性窗

口中设置它的属性值，及其满足下列要求：它的最小刻度值为1,最大刻度值为

100,在程序运行时，用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，

滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分

别显示1和100,运行时的窗体如图所示。

注意：存盘时必须存放在考生文件夹

下，工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。(2)在名称为Forml的窗体

上添加两个名称分别为Textl和Text2的文本框，初始内容均为空：再建立一个下

拉菜单，菜单标题为“操作”，名称为Ml,此菜单下含有两个菜单项，名称分别为

Copy和Clear,标题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序

运行时,单击“复制”选项菜单，则把Textl中的内容复制到Text2中，单击“清除”

选项菜单，则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如

图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。注

意：存盘时必须存放在考生文件夹下，工程文件名为Sjt2,vbp,窗体文件名为

标准答案：（1）【操作步骤】步骤1：打开VisualBasic开发环境，按照题目的要求

新建窗体并添加一个水平滚动条控件，如图3.1所示。

1

窗

性

属

在

：

2。

骤示

所

步2

.3

图

如

，

性

属

关

相

的

条

1动

0.

3滚

平

图水

置

设

求

要

的

目

题

照

按

，

中

图3.2步骤3：按照题目的

要求，在窗体上添加两个标签控件，如图3.3所示。

图3.3步骤4：按照题

目的要求设置两个标签的相关属性，如图3.4所示。

博"Lab"2"忖竹

[Lt

图3.4程序中用到的控件及属性见

表3.1

[控■

属性设置值：|

Namelil

Min1

滚动条

Max100

IjirgeChange10

Nam—1.1

标签1

Caption1

NameL2

标签2

(%pl沁n100

表3.1。步骤5：按

下键盘上的F5键运行程序，程序运行后的窗体界面如图3.5所示。

图3・5步骤6：按题目要求保存工程和窗体，如

图3.6所示。图3.6⑵

【操作步骤】步骤1：新建窗体，按表3.2建立菜单项并设置其属性，如图3.7

表3.2

掾作复制清除

名林MlCopyCicar

内编符号011

所示。图3.7步骤2：同步骤1,

输入第3项的标题和名称，单击确定即可。步骤3：添加文本框控件，按表3.3

设置文本框的属性。

表3.3

卜控件

文本框1文本框2

「属性

NomeName

if设置值

TextlText2

步骤4：打开代码编

写窗口，编写程序代码，如图3.8所不。

ClFtml

;受7]F-**]fl

O“

口双二2KP白袋僵入代归跳马界Bi

9

0

•

图3・8参考答案PrivateSub

ClearClick()Text2.Text=M"EndSubPrivateSubCopyClick()Texi2.Text==

Textl.TextEndSub步骤5：调试并运行程序，关闭程序后按题目要求存盘。

知识点解析：暂无解析

二、简单应用题(本题共1题，每题7.0分，共1分。)

2、(1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签Label1,

请添加一个单选按钮数组，名称为Opl,含三个单选按钮，它们的Index属性分别

为0、1、2,标题依次为“飞机”、“火车”、“汽车”，再添加一个名称为Textl的文

本框。窗体文件中已经给出了Opl的Click事件过程，但不完整，要求去掉程序中

的注释符，把程序中的。改为正确的内容，使得在程序运行时单击“飞机”或“火车”

单选按钮时，在Textl中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮

时，在Texll中显示“我开汽车去”，如图所示。注意：不能修改程序中的其他部

分。最后将修改后的文件按原文件名存盘。

0Forml

二（2）在考生文件夹下有一个工程文

件sjt4.vbp,Fonnl窗体中有一个文本框，名称为Tcxtl；请先在窗体上添加两个

框架控件，名称分别为Fl、F2,标题分别为“性别”、“身份”；然后在F1中添用两

个单选按钮控件Opl、0p2,标题分别为“男”、“女”；其次在F2中添加两个单选按

钮控件Op3、0p4,标题分别为“学生”、“教师”;最后再添加一个命令按钮,名称

为C1,标题为“确定”，如图所示。请编写适当的事件过程，使得运行时，在F1、

F2中各选一个单选按钮，然后单击“确定”按钮，就可以按照下表把结果显示在文

性别身份在文本格中显示的内容

男学生我是男学生

男教师我是男教师

女学生我是女学生

女教师我是女教师

本框中。最后把修改后

的文件以原来的文件名存盘。注意：考生不得修改窗体文件中已经存在的程序和

Textl的属性，在结束程序运行之前，必须进行能够产生上表中一个结果的操作。

必须用窗体右上角的关闭按钮结束程序，否则无成绩。

标准答案：（1）【操作步骤】步骤1:打开本题工程文件，按照题目要求建立单选

按钮数组，如图3.9所示。re3.9步骤2：按照题

目要求建立其他控件并设置其属性，见表3.4。

表3.4

设置值|

i若件属性

Caption飞机

单选按钮1

Index0

Caption火车

单选按钮2

Index1

Caption汽车

单选按钮3

Index2

文本框NameTextl

步骤3：打开代码编

辑窗口，去掉程序中的注释符将问号改为正确的内容。参考答案PrivateSub

Opl_Click(IndexAsInteger)DimaAsString,bAsString,cAsStringa="我坐"b=

“我开"SelectCaseIndex'通过Index值决定响应哪一个控件数组Case0Textl.Text

=a-bMc.Opl(O).Capiion+"去"Case1Textl.Tcxi=a+Mc.opl(l).Caption+M

去”'当Index值为1时，选择“我坐“Case2Text].Text=b+Me.0pl(2).Caption

+“去"EndSelectEndSub步骤4：调试并运行程序，关闭程序后按题目要求存

盘。(2)【操作步骤】步骤1：打开本题工程文件，按照题目要求建立框架控件并

设置其属性，如图3.10所示。

图3.10步躲2：按照步骤1

建立其他控件并设置相关属性，程序中用到的控件及属性见表3.5和表3.6。

表3.5

■控件

属性设置值

NameFl

框架1

(laption性别

NameF2

框架2

Caption身份

NameCl

命令按钮

Caption确定

表3.6

控件属性设置值

NameOpl

单选按钮1

Caption男

Name0p2

单选按钮2

Caption女

Name0p3

单选按钮3

(Option学生

Name0p4

单选按钮3

(jiption教师

步骤3：打开代码

编辑窗口，在指定位置编写如下代码。参考答案PrivateSubcl_click（）Text1.Text

=”我是"‘首先确定不论选什么情况Texll的内容一定以“我是“异头IfOpl.Value

ThenTextl.Text=Textl.Text&Op1.CaptionElseTextl.Text=

Tcxtl.Tcxt&Op2.CaptionEndIf，通过单选按钮的Value值（选择为true,否则为

false）确认性别,最后把其Caption值接至Textl后If0p3.ValueThenTextl.Text

=Textl.Text&Op3.CaptionElseTextl.Text=Textl.Text&Op4.CaptionEnd

If'确认身份，思路同上EndSub步骤4：调试并运行程序，关闭程序后按题目要求

存盘。

知识点解析：暂无解析

三、综合应用题（本题共I题，每题1.0分，共1分C）

3、以下数列：1,1,2,3,5,8,13,21…的规律是从第3个数开始，每个数都

是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vbpo窗体中已经给

出了所有控件•：如图所示。请编写适当的事件过程完成如下功能：选中一个单选按

钮后，单击“计算”按钮，则计算出上述数列第n项的值，并在文本框中显示，n是

选中的单选按钮后面的数值(提示：因计算结果较大，应使用长整型变量)。注意：

不能修改已经给出的程序和已有的控件的属性；在结束程序运行之前，必须选中一

个单选按钮，并单击“计算”按钮以获得一个结果；必须使用窗体右上角的关闭按钮

结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。

标准答案：【操作步骤】步骤1：打开本题工程文件。步骤2：打开代码编辑窗

口，在指定位置编写如下代码。参考答案PrivateSubCommandl_Qick()Dima()As

LongDimiAsIntegerDimnAsInteger^Opl.Count是单选按钮数目，这里用的是

控件数组Fori=OToOpl.Count—1，判断哪一项被选择，把它后面的数值赋给

n,确定n值IfOpl(i).Value=TrueThenn=Val(Opl(i).Caption)ExitForEndIf

NextRcDima(n)。重新申请空间，这里是动态申请a⑴=1a(2)=1，数列第一项、第

二项值确定Fori=3Tona(i)=a(-1)+a(i—2)，后一项值是前两项值之和Next

Textl.Text=a(n)EndSub步骤3：调试并运行程序，关闭程序后按题目要求存

盘。

知识点解析：暂无解析

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

第3套

一、基本操作题(本题共［题，每题7.0分，共7分。)

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

名称为Fom】l、标题为“列表框练习”的窗体上画一个名称为Listl的列表框，表项

内容依次输入xxx、ddd、mmm和aaa,且以宋体14号字显示表项内容，如图3-

102(a)所示。最后设置相应属性，使运行后列表框中的表项按字母升序方式排列，

如图3—102(b)所示。

(b)

图3・10~注意：存盘时，

将文件保存至考生文件夹下，且窗体文件名为sjtl.frm,工程文件名为

sjtl.vbpo(2)在名称为Form1的窗体上，画一个名称为Label1的标签，其标题为

“计算机等级考试”，字体为宋体，字号为12号，且能根据标题内容自动调整标签

的大小。再画两个名称分别为Command1、Command?,标题分别为"缩小"和"还

原”的命令按钮(如图3—103所示)。图3”()3要求：编写适当

的事件过程，使得单击“缩小”按钮，Label1中所显示的标题内容自动减小两个字

号；单击“还原”按钮,Labell所显示的标题内容的大小自动恢复到12号。注意：

存盘时，将文件保存至考生文件夹下，窗体文件名为sjt2.frm,工程文件名为

sjt2.vbpo要求程序中不得使用变量，每个事件过程中只能写一条语句。

标准答案：(1)【操作步骤】步骤1：新建一个“标准EXE”工程，如表4—62在窗

体中画出控件并设置其相关属性。

表462

对象属性值

NameFormI

窗体

Caption列表框练习

NameListl

Listxxx、ddd、mmm、aaa

列表框FontNamc宋体

FoncSize14号

SortedTrue

步骤2：按要求将

文件保存至考生文件夹中。(2)【操作步骤】步骤1：新建一个“标准EXE”工程，

如表4-63在窗体中画出控件并设置其相关属性。

表463

属性值

NameLabel1

标签AutoSizeTrue

Caption计算机等级考试

Font宋体12号

NameCommand1

命令按钮i

Caption缩小

NameCommand2

命令按钮2

Caption还原

步骤2：打开代

码编辑窗口，编写两个命令按钮的Click事件过程。参考代码：PrivateSub

Commandl_Click()Label1.Fontsize=Label1.FontSize—2EndSubPrivateSub

Command2_Click()Labcll.FontSize=12EndSub步骤3：按要求将文件保存至考

生文件夹中。

知识点解析：暂无解析

二、简单应用题(本题共1题，每题1.0分，共1分0)

2、（1）考生文件夹下的工程文件sjt3.vbp中有一个初始内容为空、且带有垂直滚

动条的文本框，其名称为Textl；两个标题分别为“读数据”和“查找”的命令按钮，

其名称分别为Cmdl、Cmd2o请画一个标题为“查找结果”的标签Label1,再画一

个名称为Texl2,其初始内容为空的文本框，如图3—104所示。

图3/04程序功能如下：①单击“读数据”按钮，则

将考生文件夹下M3,dat文件中己按升序排列的30个整数读入一维数组a中，并

同时显示在Textl文本框内；②单击“查找”按钮，将弹出输入框接收用户输入的

任意一个偶数，若接收的数为奇数，则提示重新输入。如果接收的偶数超出一维数

组a的数值范围，则无须进行相应查找工作，直接在Text2内给出结果；否则，在

一维数组a中查找该数，并根据查找结果在Text2文本框内显示相应信息。命令按

钮的Click事件过程己给出，但“查找”按钮的Click事件过程不完整，请将其中的

注释符去掉，把"?”改为正确的内容，以实现上述程序功能。注意：考生不得修改

窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。（2）考生文件天下

的工程文件sjt4.vbp中有一个初始内容为空的文本框Textl,一个包含三个元素的

文本框控件数组Text2,两个标题分别是“读数据”和“统计”的命令按钮，两个分别

含有三个元素的标签控件数组LabelI和Label2,如图3—105所示。

［罚ITU,程序功能如下：①考生文件夹下

in4.dat文件中存有20个考生的考号及数学和语文单科考试成绩。单击“读数据”

按钮，可以将in4.dat文件内容读入到20行3列的二维数组a中，并同时显示在

Tex”文本框内；②单击“统计”按钮，则对考生数学和语文的平均分在“优秀”、

“通过”和“不通过”三个分数段的人数进行统计，并将人数统计结果显示在控件数组

Text2中相应位置。其中，平均分在85分以上(含85分)为“优秀”，平均分在60〜

85分之间(含60分)为“通过”，平均分在60分以下为“不通过”。命令按钮的Click

事件过程已经给出，但，统计”按钮的Click事件过程不完整，请将其中的注释符去

掉，把"?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件

中已经存在的控件和程序，最后程序按原文件名存盘。

标准答案：(1)【操作步骤】步骤1：打开考生文件夹下的工程文件皿3.vbp,打

开代码编辑窗口，去掉程序中的注释符将问号“?”改为正确的内容。参考代

码：Ifnum/2<>Fix(num/2)ThenIfnum<a(l)Ornum>a(30)ThenIfa(n)Mnum

ThenIfn>30Then步骤2：按要求将文件保存至考生文件夹中。(2)【操作步骤】

步骤1：打开考生文件夹中的本题工程文件sjt4.vbp,打开代码编辑窗口，去掉程

序中的注释符“小，将问号"?”改为正确的内容。参考代码：Avg=(a(i,2)+a(i,3))

/2CaseIs>=85Case60To84EndSelectText2(n-l)=x(n)步骤2：按要求将文

件保存至考生文件夹中。

知识点解析：暂无解析

三、综合应用题(本题共［题，每题7.0分，共7分0)

3、考生文件夹下的工程文件sjt5.vbp中有一个初始内容为空的文本框Textl,两

个标题分别是“读数据”和“计算”的命令按钮；请画一个标题为“各行平均数的最大

值为"的标签Label2,再画一个初始内容为空的文本框Text2,如图3—106所示。

程序功能：①单击“读数据”

按钮，则将考生文件夹下in5.dat文件的内容读入20行5列的二维数组a中，并

同时显示在Textl文本框内；②单击“计算”按钮，则自动统计二维数组a中各行

的平均数，并将这些平均数中的最大值显示在Text2文本框内。“读数据”按钮的

Click事件过程已经给出，请编写“计算”按钮的Click事件过程实现上述功能。注

意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须

用“计算”按钮进行计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。

最后，程序按原文件名存盘。

标准答案：【操作步骤】步骤1：打开考生文件夹中的本题工程文件sjt5.vbp,

在窗体Forml中画一个标签和一个文本框，其属性及值如表4一64所示。

«4-64

1对象及性值

NameLabel2

标签

Caption各行平均数的最人值为

NameTcxt2

文本框

Text空

一步骤2：打开代码

编辑窗口，在指定位置编写以下代码。参考代码：Fori=1To20Sum=0Forj=1

To5Sum=Sum+a(i,j)NextAvg=Sum/5Ifi=1ThenMax=AvgElselfMax<

AvgThenMax=AvgEndIfNext

知识点解析：暂无解析

国家二级VB机试（上机操作）模拟试卷

第4套

一、基本操作题（本题共1题，每题i.o分，共1分。）

1、考生文件夹卜有一个数据库文件“sampl.accdb”，其中存在已经设计好的表对

象“Stud”。请按照以下要求，完成对表的修改。（I）设置数据表显示的字体大小为

14、行高为18。（2）设置“简历”字段的设计说明为“自上大学起的简历信息，（3）将

“年龄”字段的数据类型改为字段大小为“整型”的数字型。（4）将学号为“20011001”

学生的照片信息改成考生文件夹下的“photo.bmp”图像文件。（5）将隐藏的“党员

否字段重新显示出来。（6）完成上述操作后，将“备注”字段删除。

标准答案：（1）【操作步骤】步骤1：选择“表”对象，右键单击表“tStud”，在弹出

的快捷菜单中选择“打开”命令或直接双击打开表“tStud”。如图3.71所示。

图

3.71步骤2：单击“开始”选

项卡下的“文本格式”组，在“字号”下拉列表中选择、4”，如图3.72所示。

■/n△一2—・・・照•«*•

图3.72

步骤3：单击“开始”选项卡“记录”组中的“其他”

按钮，从弹出的快捷菜单中选择“行高”命令，在弹出的对话框中输入“18”，单击

“确定”按钮，单击快速访问工具栏中的“保存”按钮。如图3.73所示。

es

图3.73

(2)【操作步骤】打

开表“tStud”的设计视图，在“简历”字段的“说明”列输入“自上大学起的简历信息”。

如图3.74所示。图3・74⑶［操

作步骤】在设计视图中单击“年龄”字段行任一处，在“字段大小”下拉列表中选择

“整型单击快速访问工具栏中的“保存''按钮ML关闭设计视图。如图3.75所

示。图3.75（4）【操作步骤】

步骤1：股击打开表“tSlud"，右键单击学号为“20011001”对应的照片列，从弹出的

快捷菜单中选择“插入对象”命令。如图3.76所示。

怪B•.人立时倒・而历

勇|2003/9/12003年W各注二I

■OCD

2005/9/42005年在北京

eg

2004/9/112004年在北京

io

2003/9/22003年在北京

2005,922005年在北京

2005/9,32005年在北京41

2005912005年在北京M-»r

2004/9/42004年在北京

2003/9/72003年在北京

__OA/u/oza9aaxH*.i

,■IM”*，X，”1r

图3.76

步骤2：选择”由文件

创建''单选框，单击“浏览”按钮，在考生文件夹处找到“photo,bmp”文件。单击快

速访问工具栏中的“保存”按钮，关闭数据表。如图3.77所示。

图3・77⑸【操作步骤】在数据表中单击

“开始”选项卡“记录”组中的“其他”按钮，在弹出的快捷菜单中选择“取消隐藏字段”

1/MOvtkwha?eg

iff封存元OvMdA，，

工

ffi7WXL

Hwn(D

图3.78⑹【操作步骤】在数

据表中右键单击“备注”列,选择“删除字段”命令，在弹出的对话框中单击“是”按

钮，如图3.79所示。然后再单击快速访问工具栏中的“保存”按钮,关闭数据

Q|e■MM-aMiai

•a

・0：TII>:/*

表。图3