1、国家二级 VB机试（上机操作）模拟试卷 294及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1的窗体上画一个文本框，其名称为 T1，宽度和高度分别为 1400、400；再画两个命令按钮，其名称分别为 C1和C2，标题分别为“显示”和“扩大”，编写适当的事件过程。程序运行后，如果单击 C1命令按钮，则在文本框中显示“等级考试”，如图 3107(a)所示；如果单击 C2命令按钮，则使文本框在高、宽方向上各增加一倍，文本框中的字体大小扩大到原来的
2、 3倍，如图 3107(b)所示。 注意：要求程序中不得使用变量。存盘时必须存放在考生文件夹下，工程文件名为 sit1vbp，窗体文件名为 sit1frm。(2)在名称为 Form1的窗体上画一个命令按钮，其名称为 C1，标题为“转换”；然后再画两个文本框，其名称分别为 Text1和 Text2，初始内容均为空白，编写适当的事件过程。程序运行后，在 Text1中输入一行英文字符串，如果单击转换按钮，则 Text1文本框中的字母都变为小写，而 Text2中的字母都变为大写。例如，在 Text1中输入 visual basic programming，则单击转换按钮后，结果如图 3108所示。（分
3、数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sit3vbp，相应的窗体文件为 sjt3frm，包含了所有控件和部分程序，如图 3109所示。要求如下：利用属性窗口向列表框添加四个项目：Visual Basic、Turbo C、C+、Java。请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮 Option1，然后单击“确定”按钮，则文本框中显示“笔试”；当选择列表框中的一项和单选按钮 Option2，然后单击“确定”按钮，则文本框中显示“上机”。其中“”是在列表框中所选择的项目。注意：考生不得修改窗体文件中已经存在的程序，退出程
4、序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前，必须至少要进行一次选择操作(包括列表框和单选按钮)，否则不得分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件 sjt4vbp，相应的窗体文件为 sjt4frm。在窗体上有一个命令按钮，其名称为 Command1，标题为“计算并输出”。程序运行后，如果单击命令按钮，程序将计算 500以内两个数之间(包括开头和结尾的数)所有连续数的和为 1250的正整数，并在窗体上显示出来。这样的数有多组，程序输出每组开头和结尾的正整数，并用“”连接起来，如图 3110所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把
5、程序中的“?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在窗体上画一个文本框，其名称为 Text1，初始内容为空白，并设置成多行显示格式；然后再画两个命令按钮，其名称分别为 Command1和 Command2，标题分别为“显示”和“保存”，如图 3111所示，编写适当的事件过程。程序运行后，如果单击“显示”按钮，则读取考生文件夹下的 in5txt 文件，并在文本框中显示出来，该文件是一个用随机存取方式建立的文件，共有 5个记录，要求按记录号顺序显示全部记录，每个记
6、录一行；如果单击“保存”按钮，则把所有记录保存到考生文件夹下的顺序文件out5txt 中。随机文件 in5txt 中的每个记录包括三个字段，分别为姓名、性别和年龄，其名称和长度分别为： 其类型定义为：Private Type StudInfoName As String*8Sex As String*4Age As IntegerEnd Type要求：文件 out5txt 以顺序存取方式建立和保存。存盘时必须存放在考生文件夹下，工程文件名为 sjt5vbp，窗体文件名为 sjt5frm。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 294答案解析(总分：6.00，做题时间：90
7、 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。(1)在名称为 Form1的窗体上画一个文本框，其名称为 T1，宽度和高度分别为 1400、400；再画两个命令按钮，其名称分别为 C1和C2，标题分别为“显示”和“扩大”，编写适当的事件过程。程序运行后，如果单击 C1命令按钮，则在文本框中显示“等级考试”，如图 3107(a)所示；如果单击 C2命令按钮，则使文本框在高、宽方向上各增加一倍，文本框中的字体大小扩大到原来的 3倍，如图 3107(b)所示。 注意：要求程序中不得使用变量。存盘时必须存放在考生文
8、件夹下，工程文件名为 sit1vbp，窗体文件名为 sit1frm。(2)在名称为 Form1的窗体上画一个命令按钮，其名称为 C1，标题为“转换”；然后再画两个文本框，其名称分别为 Text1和 Text2，初始内容均为空白，编写适当的事件过程。程序运行后，在 Text1中输入一行英文字符串，如果单击转换按钮，则 Text1文本框中的字母都变为小写，而 Text2中的字母都变为大写。例如，在 Text1中输入 visual basic programming，则单击转换按钮后，结果如图 3108所示。（分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1：新建一个“标准 EXE”工程
9、，如表 465在窗体中画出控件并设置其相关属性。 步骤 2：打开代码编辑窗口，编写两个命令按钮的单击事件过程。 参考代码： Private Sub C1_Click() T1=“等级考试“ End Sub Private Sub C2_Click() T1Height=2*MeT1Height T1Width=2*T1Width T1FontSize=3*Form1T1FontSize End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 步骤 1：新建一个“标准 EXE”工程，如表 466在窗体中画出控件并设置其相关属性。 )解析：解析：第 1小题：要在单击“扩大”按钮时，
10、使文本框在高、宽方向上各增加一倍，只需在“扩大”按钮的 Click事件中编写设置文本框的 Height和 Width属性值为原来 2倍的语句。要使文本框中的字体大小扩大到原来的 3信，需编写设置文本框的 FontSize属性值为原来 3倍的语句。 第 2小题：本题源程序是在命令按钮的单击事件过程中，将文本框 Text1中的字符用 UCase函数转换为大写并显示在 Text2中，同时用 LCase函数转换为小写并显示在 Text1中。二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sit3vbp，相应的窗体文件为 sjt3frm，包含了所有控件和部分程序，如图
11、 3109所示。要求如下：利用属性窗口向列表框添加四个项目：Visual Basic、Turbo C、C+、Java。请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮 Option1，然后单击“确定”按钮，则文本框中显示“笔试”；当选择列表框中的一项和单选按钮 Option2，然后单击“确定”按钮，则文本框中显示“上机”。其中“”是在列表框中所选择的项目。注意：考生不得修改窗体文件中已经存在的程序，退出程序时必须通过单击窗体右上角的关闭按钮。在结束程序运行之前，必须至少要进行一次选择操作(包括列表框和单选按钮)，否则不得分。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一
12、个工程文件 sjt4vbp，相应的窗体文件为 sjt4frm。在窗体上有一个命令按钮，其名称为 Command1，标题为“计算并输出”。程序运行后，如果单击命令按钮，程序将计算 500以内两个数之间(包括开头和结尾的数)所有连续数的和为 1250的正整数，并在窗体上显示出来。这样的数有多组，程序输出每组开头和结尾的正整数，并用“”连接起来，如图 3110所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 （分数：2.00）_正确答案：(正确答案：第 1小题 步骤 1
13、：打开考生文件夹下的工程文件 sjt3vbp，在窗体上选中列表框，为其 List属性输入四个项目：Visual Basic、TurboC、C+、Java，注意每输入一项后用Ctrl+Enters键换到下一项输入。 步骤 2：打开代码编辑窗口，编写“确定”按钮的单击事件过程。 参考代码： If Option1Valoe And List1Text“ “ Then Text1Text=List1Text& Option1Caption Else If Option2Value And List1Text“ “Then Text1Text=List1Text&Option2Captio n End
14、If End If 步骤 3：按要求将文件保存至考生文件夹中。 步骤 4：按F5键运行程序，在列表框中选择一项，并选中一个单选按钮，单击“确定”按钮。单击窗体右上角的关闭按钮结束程序。 第 2小题 步骤 1：打开考生文件夹中的本题工程文件sjt4vbp，在代码编辑窗口，去掉程序中的注释符“”，将问号“?”改为正确的内容。 参考代码： iSum=0 iSum=iSum+j If iSum=1250Then 步骤 2：按要求将文件保存至考尘文件夹中。)解析：解析：第 1小题：本题根据是选择“笔试”或“上机”分为两种情况，若选择“笔试”则在文本框中显示列表框的 Text属性值与单选按钮 Option
15、1的 Caption属性值的组合内容；若选择“上机”则在文本框中显示列表框的 Text属性值与单选按钮 Option2的 Caption属性值的组合内容。 第 2小题：程序设计思路：按顺序让 1500 中的每一个数都与它之后的所有的数逐一相加，在相加过程中若累加和等丁或超过 1250时，则停止该组数继续相加，并将和等于 1250的该组数的开头和结尾的数按题目要求输出。源程序使用嵌套 For循环完成上述功能，变量 iSum用于记录每组数累加时的和，其初值应为 0；表达式iSum=iSum+i用于实现累加功能；当累加和正好等于 1250时，输出该组数的开头和结尾的数，即 i和 j。三、综合应用题(
16、总题数：1，分数：2.00)3.在窗体上画一个文本框，其名称为 Text1，初始内容为空白，并设置成多行显示格式；然后再画两个命令按钮，其名称分别为 Command1和 Command2，标题分别为“显示”和“保存”，如图 3111所示，编写适当的事件过程。程序运行后，如果单击“显示”按钮，则读取考生文件夹下的 in5txt 文件，并在文本框中显示出来，该文件是一个用随机存取方式建立的文件，共有 5个记录，要求按记录号顺序显示全部记录，每个记录一行；如果单击“保存”按钮，则把所有记录保存到考生文件夹下的顺序文件out5txt 中。随机文件 in5txt 中的每个记录包括三个字段，分别为姓名、性
17、别和年龄，其名称和长度分别为： 其类型定义为：Private Type StudInfoName As String*8Sex As String*4Age As IntegerEnd Type要求：文件 out5txt 以顺序存取方式建立和保存。存盘时必须存放在考生文件夹下，工程文件名为 sjt5vbp，窗体文件名为 sjt5frm。 （分数：2.00）_正确答案：(正确答案：步骤 1：新建一个“标准 EXE”工程，如表 467在窗体中画出控件并设置其相关属性。 )解析：解析：本题程序设计思路：在“显示”按钮的单击事件过程中，用 Open语句以随机方式打开数据文件 in5txt，并用 Get读出一条记录显示在文本框中，随后读取下一条记录，直到所有的记录都读取完毕；在“保存”按钮的单击事件过程中，用 Open语句以 Output方式打开数据文件 out5txt，并用Print#方法将文本框中的值存入该文件。
