计算机二级考试题库vb知识点,国家计算机二级考试题库 VB上机试题第13套

国家计算机二级考试题库 VB上机试题第13套：

1. 基本操作(2小题，每小题15分，共计30分)

注意：下面出现的“考生文件夹”均为%USER%

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

(1)在名称为Form1的窗体上画一个图片框，名称为P1，高为1800，宽为1700

，通过属性窗口把图形文件pic1.bmp放到图片框中(如图所示)。

注意：

存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件

名为sjt1.frm。

BCE 培训中心内部资料；

☆国家教育部考试中心题库☆ 49

解题思路：

启动Visual Basic系统，创建一个Form1窗体。

在该窗体上画一个图片框控件，通过其属性窗口将名称设为P1，高(Height属性)设置为1800，宽(Width

属性)设置为1700，通过Picture属性装入pic1.bmp图像文件。

参考文件：c:wexam990001hlpsys参考答案sjt1.vbp、sjt1.frm、sjt1.frx、sjt1.vbw

请把这些文件复制到c:wexam990001中，然后打开sjt1.vbp文件并运行。

(2)在名称为Form1的窗体上画二个文本框，名称分别为Text1、Text2，都显

示垂直滚动条和水平滚动条，都可以显示多行文本；再画一个命令按钮，

名称为C1，标题为“复制”(如图所示)。请编写适当的事件过程，使

得在运行时，在Text1中输入文本后，单击“复制”按钮，就把Text1中

的文本全部复制到Text2中。程序中不得使用任何变量。

注意：

存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件

名为sjt2.frm。

解题思路：

启动Visual Basic系统，创建一个Form1窗体。

在该窗体上画二个文本框控件，通过其属性窗口将名称分别设为Text1、Text2，ScrollBars属性均设为3，

多行文本显示(Multiline属性)均设为True。画一个命令按钮控件，通过其属性窗口将名称设为C1，标题(Caption

属性)设为“复制”。画二个文本框控件，通过其属性窗口将名分别称设为Text1、Text2，文本内容(Text属

性)均设为空。

单击“复制”按钮(即运行Click事件过程)，在该Click事件过程中加入语句：

Private Sub C1_Click()

Text2.Text = Text1.Text

End Sub

参考文件：c:wexam990001hlpsys参考答案sjt2.vbp、sjt2.frm、sjt2.vbw

请把这些文件复制到c:wexam990001中，然后打开sjt2.vbp文件并运行。

2. 简单应用(2小题，每题20分，计40分)

注意：下面出现的“考生文件夹”均为%USER%

BCE 培训中心内部资料；

☆国家教育部考试中心题库☆ 50

(1)在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。

在窗体上有一个命令按钮，其名称为Command1，标题为“添加”；有一个

文本框，名称为Text1，初始内容为空白；有一个列表框，名称为List1。

程序运行后，在文本框中输入一个英文句子(由多个单词组成，各单词之

间用一个空格分开)，然后单击命令按钮，程序将把该英文句子分解为单

词，并把每个单词作为一个项目添加到列表框中，如图所示。该程序不完

整，请把它补充完整。

要求：

去掉程序中的注释符，把程序中的 ？改为正确的内容， 使其能正确运

行，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存

盘。

解题思路：

启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp，相应的窗体文件名为sjt3.frm。

由于所提供的窗体程序不完整，在“添加”按钮的Private Sub Command1_Click()事件过程中，有四处地

方需要修改。

1) 将语句

'S1 = ?

改为

S1 = Text1.Text

2) 将语句

'Do While Mid(S1, I1, 1) <> ? And I1 <= Len(S1)

改为

Do While Mid(S1, I1, 1) <> " " And I1 <= Len(S1)

3) 将语句

'List1.AddItem ?

改为

List1.AddItem S2

4) 将语句

'S2 = ?

改为

S2 = ""

参考文件：c:wexam990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.vbw

请把这些文件复制到c:wexam990001中，然后打开sjt3.vbp文件并运行。

(2)在考生文件夹下有一个工程文件sjt4.vbp，其中的窗体中有一个组合框和

一个命令按钮(如图所示)。程序的功能是在运行时，如果在组合框中输

入一个项目并单击命令按钮，则搜索组合框中的项目，如果没有此项，则

把此项添加到列表中；如果有此项，则弹出提示：“已有此项”，然后清

除输入的内容。

BCE 培训中心内部资料；

☆国家教育部考试中心题库☆ 51

要求：

去掉程序中的注释符，把程序中的 ？改为正确的内容，使其实现上述

功能，但不能修改程序中的其他部分，也不能修改控件的属性。最后把

修改后的文件以原来的文件名存盘。

解题思路：

启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt4.vbp，相应的窗体文件名为sjt4.frm。

由于所提供的窗体程序不完整，在命令按钮的Private Sub C1_Click()事件过程中，有三处地方需要修改。

1) 将语句

'For i = 0 To ?

改为

For i = 0 To Cb1.ListCount - 1

2) 将语句

'If Cb1.List(i) = ? Then

改为

If Cb1.List(i) = Cb1.Text Then

3) 将语句

'Cb1.? Cb1.Text

改为

Cb1.AddItem Cb1.Text

参考文件：c:wexam990001hlpsys参考答案sjt4.vbp、sjt4.frm、sjt4.vbw

请把这些文件复制到c:wexam990001中，然后打开sjt4.vbp文件并运行。

3. 综合应用(1小题，计30分)

注意：下面出现的“考生文件夹”均为%USER%

在考生文件夹下有文件in5.txt，文件中有几行汉字。请在Form1 的窗体上

画一个文本框，名称为Text1，能显示多行；再画一个命令按钮，名称为C1，

标题为“存盘”。编写适当的事件过程，使得在加载窗体时，把in5.txt文

件的内容显示在文本框中， 然后在文本的最前面手工插入一行汉字：计算

机等级考试，(如图所示)。 最后单击“存盘”按钮，把文本框中修改过

的内容存到文件out5.txt中。

注意：

只能在最前面插入文字，不能修改原有文字。文件必须存放在考生文件

夹下，以sjt5.vbp为文件名存储工程文件，以sjt5.frm为文件名存储窗

体文件。

BCE 培训中心内部资料；

☆国家教育部考试中心题库☆ 52

解题思路：

启动Visual Basic系统，创建一个Form1窗体。

在该窗体上画一个文本框控件，通过其属性窗口将名称设为Text1，多行(MultiLine属性)设为True。画

一个命令按钮控件，通过其属性窗口将名称设为C1，标题(Caption属性)设为“存盘”。

加载窗体(即运行窗体的Load事件过程)，在该Load事件过程中加入语句：

Private Sub Form_Load()

Open App.Path & "in5.txt" For Input As #1

Text1.Text = ""

Do While Not EOF(1)

Line Input #1, a$

Text1.Text = Text1.Text + a$ + Chr(13) + Chr(10)

Loop

Close #1

End Sub

单击“存盘”按钮(即运行Click事件过程)，在该Click事件过程中加入语句：

Private Sub C1_Click()

Open App.Path & "out5.txt" For Output As #1

Print #1, Text1.Text

Close #1

End Sub

参考文件：c:wexam990001hlpsys参考答案sjt5.vbp、sjt5.frm、sjt5.vbw、out5.txt

请把这些文件复制到c:wexam990001中，然后打开sjt5.vbp文件并运行。