全国计算机等级考试二级VB上机题库以及解析.doc
国家二级VB机试(上机操作)模拟试卷498(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷498(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Comb01的组合框，其宽度为1200，其类型如图3－188所示(即简单组合框)。
要求如下：①请按图中所示，通过属性窗口输入“北京”、“上海”、“广州”、“深圳”。
②设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消失。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画两个文本框，名称分别为Text1、Text2，再画两个命令按钮，名称分别为Command1、Command2，标题分别为“左”、“右”，如图3－189。
要求：编写适当的事件过程，使得程序运行时，单击“左”按钮，则焦点位于Text1上；单击“右”按钮，则焦点位于Text2上。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：双击“左”命令按钮，打开代码编辑窗口，在按钮的Click事件过程中输入代码。
步骤3：从代码编辑窗口的“对象”下拉列表中选择Command2，从“事件”下拉列表选择Click，编写以下事件过程。
参考代码：Private Sub Command1_Click( ) Text1．SetFOCUS End Sub Private Sub Command2_Click( ) Text2．SetFOCUS End Sub 步骤4：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷450(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷450(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框，它们的高、宽分别为300、2400和1200、2400。
窗体的标题为“窗口”。
请通过属性窗口设置适当的属性，满足如下要求：①Text2可以业示多行文本，并且有垂直和水平两个滚动条；②程序运行时在Text1中显示输入的字符为“*”。
程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下。
工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。
(2)在名称为Form1的窗体上添加一个名称为Image1的图像框，其高、宽分别为1900、1700，通过属性窗口把考生文件夹下的图像文件pic1．bmp载入图像框；再画两个命令按钮控件，名称分别为C1、C2，标题分别为“放大”、“缩小”，如图所示。
要求：①请编写适当的事件过程，程序运行后，如果单击“放大”按钮，则将图像框的高度、宽度均增加100；单击“缩小”按钮，则将图像框的高度、忧度均减少100，要求程序中不得使用任何变量。
②通过属性窗口设置图像框的适当属性，使得在放大、缩小图像框时，其中的图像也自动放大、缩小。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
正确答案：(1)步骤1：新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控件及属性见表3．8和表3．9。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
(2)步骤1：新建一个窗体，按照题目要求建立控件并设置图像框相应属性，如图3．17所示。
步骤2：按照步骤1设置其他控件相关属性，程亭中涉及的控件及属性见表3．10。
步骤3：打开代码编辑窗口，在指定位置编写如下代码。
参考答案Private Sub C1 Click( )’当单击”放大”按钮时，依次将Imagel的高与宽分别加100 Imagel．Height=Imagel．Height+i00 Imagel．Width=Imagel．Width+100 End Sub Private Sub C2 Click( )’当单击”缩小”按钮，则依次将Imagel的高与宽分别减100 Imagel．Height=Imagel．Height—100 Imagel．Width=Imagel．Width一100 End Sub 步骤4：调试并运行程序，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷410(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷410(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)请在名称为Form1的窗体上添加一个名称为H1的水平滚动条，并在属性窗口中设置它的属性值，使其满足下列要求：它的最小刻度值为1，最大刻度值为100，在程序运行时，用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框，初始内容均为空；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序运行时，单击“复制”选项菜单，则把Text1中的内容复制到Text2中，单击“清除”选项菜单，则清除Text2中的内容(即在Text2中填入空字符串)。
运行时的窗体如图所示。
要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为Sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：(1)【操作步骤】步骤1：打开Visual Basic开发环境，按照题目的要求新建窗体并添加一个水平滚动条控件，如图3．1所示。
步骤2：在属性窗口中，按照题目的要求设置水平滚动条的相关属性，如图3．2所示。
步骤3：按照题目的要求，在窗体上添加两个标签控件，如图3．3所示。
步骤4：按照题目的要求设置两个标签的相关属性，如图3．4所示。
程序中用到的控件及属性见表3．1。
步骤5：按下键盘上的F5键运行程序，程序运行后的窗体界面如图3．5所示。
步骤6：按题目要求保存工程和窗体，如图3．6所示。
国家二级VB机试(上机操作)模拟试卷460(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷460(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画1个名称为Cbol的组合框，组合框的列表项分别是：北京、天津、上海。
请设置组合框的参数，使其外观如图3－6所示。
窗体的标题是“用组合框”。
注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1．frm，工程文件名为sjt1．vbp。
(2)在名称为Form1的窗体上画1个名称为Pl的图片框，窗体的标题为“程序设计”，如图3－7(a)所示。
编写适当的事件过程，使得程序运行后，单击窗体，则在图片框中显示窗体的标题，并把窗体的标题变为Basic，如图3－7(b)所示。
注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个组合框。
按表4－3设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个图片框。
按表4－4设置其相关属性。
步骤2：在打开的代码编辑窗口中，编写窗体的Click 事件代码。
参考代码：Private Sub Form Click( ) P1．Print Form1．Caption Form1．Caption＝”Basic”End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．(1)在考生文件夹中有一个工程文件sjt3．vbp，窗体上有2个命令按钮、1．个水平滚动条和1个计时器，其名称分别为Command1、Command2、HScroll1和’Timed，如图3－8(a)所示。
程序运行后，按钮Command1、Command2的标题分别立即显示“开始”“停止”，同时把计时器的Intaval属性设置为100，Enabled 属性设置为False。
国家二级VB机试(上机操作)模拟试卷280(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷280(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1，标题为“组合框”的窗体上画1个名称为Combo1的组合框，利用属性窗口设置适当属性使其在程序刚开始运行时的界面如图3—37所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个名称为Image1的图像框，并通过属性窗口为其装入考生文件夹中的图标文件CARS．ico再画一个名称为Timer1的计时器，一个名称为Command1、标题为“开始”的命令按钮，如图3—37图3—38所示。
要求：通过属性窗口设置适当的属性，再编写适当的事件过程，使得程序运行时，单击“开始”按钮，图片可以每0．2秒向右移动50。
注意：程序中不得使用变量，每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个组合框。
按表4—25设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个图像框、一个定时器和一个命令按钮。
按表4—26设置其相关属性。
步骤2：在打开的代码编辑窗口中，编写命令按钮的Click事件代码和定时器的Timer事件代码。
参考代码：Private Sub Command1_Click( )Timer1．Enabled=TrueEnd SubPrivate Sub Timer1_Timet( )Image1．Left=50+Image1．LeftEnd Sub步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷396(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷396(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个标签，其名称为Labe11，标题为“等级考试”，BorderStyle属性为1，可以根据标题自动调整大小；然后再画一个命令按钮，其名称和标题均为Command1，编写适当的事件过程。
程序运行后，其界面如图3—127(a)所示，此时如果单击命令按钮，则标签消失，同时用标签的标题作为命令按钮的标题，如图3—127(b)所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画一个文本框，其名称为Text1，初始内容为空白；然后再画三个单选按钮，其名称分别为Op1、Op2和Op3，标题分别为北京、西安和杭州，编写适当的事件过程。
程序运行后，如果选择单选按钮Op1，则在文本框中显示“颐和园”；如果选择单选按钮Op2，则在文本框中显示“兵马俑”；如果选择单选按钮Op3，则在文本框中显示“西湖”。
程序的运行情况如图3—128所示。
要求程序中不得使用变量，事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：(1)【操作步骤】步骤1：新建一个“标准EXE”工程，如表4—75在窗体中画出控件并设置其相关属性。
步骤2：在代码编辑窗口编写以下事件过程。
参考代码：Private Sub Command1_Click( )Command1．Caption＝Labe11Labe11．ViSible＝FalSeEnd Sub 步骤3：按要求将文件保存至考生文件夹中。
(2)【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1上画一个文本框和三个单选按钮，其属性及值如表4—76所示。
国家二级VB机试(上机操作)模拟试卷166(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷166(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个名称为Shapel的圆角矩形，高、宽分别为1000、2000。
请利用属性窗口设置适当的属性满足以下要求：①圆角矩形中填满绿色(颜色值为&HOOOOFF00&或&HFF00&)；②窗体的标题为“圆角矩形”。
运行后的窗体如图2．153所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sitl．vbp，窗体文件名为sjtl．frm。
(2)在考生文件夹下有一个工程文件sjt2．vbp。
窗体中已含有除计时器外的其他控件，还有一个过程subl，其功能是按照Text1中的通话时间计算通话费，并将其显示在Text2中。
程序运行时，单击“通话开始”按钮，则在Text1中累加通话时间(每秒加1)，单击“通话结束”按钮，则停止通话时间的累加；单击“计算通话费”按钮，则调用过程subl。
要求：①在窗体上画一个计时器(如图2-154所示)，并通过属性窗口设置适当属性。
②编写三个按钮的Click事件过程。
③编写计时器的事件过程。
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句，“计算通话费”按钮的事件过程中只允许调用过程sub1。
不得修改已经存在的内容和控件属性，最后把文件按原文件名存平盘。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表3．83在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：打开本题工程文件sjt2．vbp，在窗体中画一个名为Timed，Interval属性为1000，Enabled 属性为False的计时器。
步骤2：打开代码编辑窗口，编写三个命令按钮的Click事件过程以及计时器的Timer事件过程。
国家二级VB机试(上机操作)模拟试卷116(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷116(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上添加一个计时器控件，名称为Timerl。
请利用属性窗口设置适当属性，使得在运行时可以每隔1秒，调用计时器的Timer事件过程一次。
另外，请把窗体的标题设置为“题目2”。
设计阶段的窗体如图3．16所示。
注意：保存时必须存放在考生文件夹下，工程文件名为sitl．vbp，窗体文件名为sitl．frm。
(2)在名称为Forml的窗体上画一个文本框，名称为Text1，无初始内容；再画一个图片框，名称为P1。
请编写适当的事件过程，使得在运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容，运行时的窗体如图3-17所示。
程序中不能使用任何变量。
注意：保存时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm.正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表4-10在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表4-11在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写命令按钮的单击事件过程。
参考代码：PriVate Sub Text1—Change( ) P1．Print Textl．TextEnd Sub步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．frm，在窗体上有一个命令按钮(名称为Commandl，标题为“计算并输出”)和两个文本框(名称分别为Text1和Text2)，如图3—8所示。
程序运行后，单击命令按钮，即可计算出数组Arr中10个数的正数之和pos与负数之和neg，并分别在两个文本框中显示出来。
全国计算机 二级 VB上机操作题 题目答案及解析
85 （1）【考点分析】本题考点有：文本框的Name、Height、Width、Font、FontSize属性，窗体的Caption、MaxButton、MinButton属性。
【解题思路】根据题意添加控件并设置相应属性。
不显示窗体的最大化和最小化按钮只需将其MaxButton和MinButton属性设为False即可。
【操作步骤】步骤1：建立界面，添加控件并设置控件的属性。
程序中用到的控件及属性见表3.275。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
（2）【考点分析】本题考点有：图像框的Name、Picture、Stretch属性，命令按钮的Name、Caption属性。
【解题思路】图像框（Image）的Picture属性用于在设计阶段设置在图像框中显示的图片，它的Stretch（自动伸缩）属性用来设定载入其中的图片是否需要自动调整大小，以适应图像框的大小。
本题要在单击按钮时实现"向右移动"或"向下移动"的功能，应在程序中动态设置图像框的Left和Top属性。
【操作步骤】步骤1：建立界面，添加并设置控件的属性。
程序中用到的控件及属性见表3.276。
4 步骤2：编写程序代码。
参考答案Private Sub Command1_Click()Image1.Left = Image1.Left + 100End SubPrivate Sub Command2_Click()Image1.Top = Image1.Top + 100End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。
（1）【考点分析】本题考点有：命令按钮的Caption属性和Click事件，直线控件的X1、X2、Y1、Y2属性，形状控件的Shape属性，Sin( )函数，Cos( )函数以及计时器的Enabled属性和Timer事件。
【解题思路】Sin( )函数和Cos( )函数分别返回变量的正弦和余弦值；通过X1、X2、Y1、Y2属性来设置直线的端点。
全国计算机二级VB上机题库(题+答案)
一、基本操作题下面出现的“考生文件夹”均为c:\wexam\20060001。
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
1．在窗体上建立一个二级菜单，该菜单含有“文件”和“帮助”两个主菜单项（名称分别为vbFile和vbHelp），其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项（名称分别为vbOpen、vbClose和vbExit）。
只建立菜单，不必定义其事件过程。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt1.frm，工程文件名为kt1.vbp。
2．在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2、标题分别为“喜欢”和“不喜欢”的命令按钮。
编写适当的事件过程，要求程序运行后，如果单击“喜欢”命令按钮，则在窗体上显示“数理化”；如果单击“不喜欢”命令按钮，则在窗体上显示“政史地”。
程序中不能使用任何变量，直接显示字符串。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt2.frm，工程文件名为kt2.vbp。
一、基本操作题答案1．【解题步骤】（1）打开“菜单编辑器”。
（2）菜单设计见表4-1。
表4-1标题名称内缩符号文件vbFile0打开vbOpen1关闭vbClose1退出vbExit1帮助vbHelp0（3）按要求设计含有“文件”和“帮助”的菜单栏。
（4）为“文件”菜单设计“打开”、“关闭”和“退出”三个子菜单项。
（5）设计完成之后，按规定方式存盘。
2．【解题步骤】（1）建立界面和控件并设置控件属性。
程序中用到的控件及其属性见表4-2。
表4-2控件属性设置值按钮Name Cmd1Caption喜欢按钮Name Cmd2Caption不喜欢（2）编写程序代码。
参考代码：Private Sub Cmd1_Click()Print"数理化"End SubPrivate Sub Cmd2_Click()Print"政史地"End Sub（3）调试并运行程序。
国家二级VB机试(上机操作)模拟试卷106(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷106(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml，标题为“考试”的窗体上画一个名称为Combol、初始内容为空的下拉式组合框。
下拉列表中有“隶书”、“宋体”和“楷体”三个项目。
运行后的窗体如图3一188所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sitl．vbp，窗体文件名为sitl．frm。
(2)在名称为Forml的窗体上画两个文本框，其名称分别为Text1、Text2，初始内容都为空，显示为三号字，且Text1的初始状态为不可用；再画一个名称为Command1、标题为“开始”的命令按钮，如图3—189所示。
要求：编写适当的事件过程，使得单击“开始”按钮后，Text1文本框变为可用状态，且在Text1文本框中输入字母串时，Text2文本框中用大写字母形式显示Text1文本框中的内容。
程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sit2．frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：打开代码编辑窗口，编写Textl的Change事件过程和命令按钮的单击事件过程。
参考代码：Private Sub Commandl Click( )Textl．Enabled=TrueEnd SubPriVate Sub Textl Change( )Text2．Text=UCase(Text1．Text)End Sub步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷144(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷144(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上添加一个名称为L1的标签，标签上标题为“请输入密码”，添加一个名称为Text1的文本框，其宽、高分别为2000和300，设置适当的属性，使得在输入密码时，文本框中品永为“*”字符，此外再把窗体的标题设置为“密码窗口”，以上这些设置都必须在属性窗口中进行，程序运行时的窗体如图所示。
注意：存盘时必须存放在考生文件火下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjt1．frm。
(2)在名称为Form1的窗体上添加一个名称为P1的图片框，请编写适当的事件过程，使得程序在运行时，每单击一次图片框，就在图片框中输出“单击图片框”，每单击图片框外的窗体一次，就在窗体中输出“单击窗体”，运行时的窗体如图所示。
要求在程序中不得使用变量，每个事什过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
正确答案：(1)【操作步骤】步骤1：新建一个窗体，按照要求建立控件并设置其属性，如图3．11所示。
程序中用到的控件及属性如表3．7所示。
步骤2：调试并运行程序，效果如图3．12所示。
步骤3：关闭程序后按题目要求保存T程和窗体文件。
(2)【操作步骤】步骤1：新建一个窗体，按照题日要求建立控什并设置其属性，如图3．13所示。
步骤2：打开代码编辑窗口，存指定位置编写如下代码。
参考答案Private Sub Form_CliCk( ) Form1．Print”单击窗体”End Sub Private Sub P1_Click( ) P1．Print”单击图片框”End Sub 步骤3：凋试并运行程序，关闭程序后按题目要求存盘。
简单应用题2．(1)在考生文件央下有一个工程文件sit3．vbp，窗体中柯两个图片框，名称分别为P1、P2，其中的图片内容分别是-架航天飞机和一朵云彩，一个命令按钮，名称为C1，标题为“发射”，还有一个计时器，名称为Timer1。
全国计算机等级考试二级VB上机题库以及解析
全国计算机等级考试二级VB上机题库(一)图1 图2=+1400=+400=*3最后单击保存按钮，工程命名为,窗体命名为。
=LCase=UCase一、简单应用题（2小题，每小题20分，共计40分）1.在考生目录下有一个工程文件，相应的窗体文件为。
包含所有控件和部分程序，如图所示。
要求：1)利用属性窗口向列表框添加四个项目：Visual Basic,Turbo C,C++,Java;2)请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮Option1,然后单击“确定”命令按钮，则文本框中显示“XXX笔试”；当选择列表框中的一项和单选按钮Option2，然后单击“确定”命令按钮，则文本框中的一项和单选按钮Option2，然后单击“确定”命令按钮，则文本框中显示“XXX上机”。
其中“XXX”是在列表框中所选择的项目。
If =True then=+End IfIf =True then=+End If最后单击保存按钮。
2．在考生目录下有一个工程文件，相应的窗体文件为。
在窗体上已经有一个命令按钮。
其名称为Command1,标题为“计算并输出”；程序运行后，如果单击命令按钮，程序将计算500以内两个数之间（包括开头和结尾的数）所有连续数的和为1250的正整数，并在窗体上显示出来，这样的数有多组，程序输出每组开头和结尾的正整数，并用“～”连接起来,如图所示，这个程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的？该为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。
最后把修改的文件按原文件存盘。
Private Sub Command1_Click()Dim i As Integer, j As Integer, iSum As IntegerPrint "连续和为1250的正整数是："For i = 1 T o 500' isum = 0 赋初值For j = i To 500' iSum = j+iSum进行累加If iSum >= 1250 Then Exit ForNext' If iSum = 1250 Then 和是否为1250 Print i; " ～"; jEnd IfNextEnd Sub答案为：1）2)j+iSum 3)1250二、综合应用题（1小题，计40分）在窗体上画一个文本框，名称为Text1,初始内容为空白，并设置多行显示格式；然后再画两个命令按钮，其名称分别为Command1和Command2,标题分别为“显示”和“保存”，如图所示，编写适当的事件过程。
国家二级VB机试(上机操作)模拟试卷532(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷532(题后含答案及解析)题型有：1.vbp，窗体文件名为sjt1.frm。
（2）在窗体上画两个文本框，名称分别为Text1、Text2。
请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在Text1中每输入一个字符，则显示一个“*”，同时在Text2中显示输入的内容（如图1－155所示）。
程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，利用菜单设计器如表2－63在窗体上建立一个二级菜单。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程。
步骤2：在窗体Form1中加入两个文本框，并分别设置它们的相关属性，属性及值如表2－64所示。
步骤3：双击Text1文本框，打开代码编辑窗口，在Text1的Change事件过程中输入如下代码：参考代码：Private Sub Text1_Change( ) Text2.Text = Text1.Text End Sub 步骤4：按要求将文件保存至考生文件夹中。
简单应用题2．（1）在名称为Form1的窗体上画两个图片框，名称分别为P1、P2，高度均为1900，宽度均为1700，通过属性窗口把图片文件pic1.bmp 放入P1中，把图片文件pic2.jpg 放入P2 中；再画一个命令按钮，名称为C1，标题为“交换图片”（如图1－156所示）。
编写适当的事件过程，使得在运行时，如果单击“交换图片”按钮，则在P1中显示pic2.jpg，在P2中显示pic1.bmp。
程序中不得使用任何变量，也不能使用第三个图片框。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。
（2）在考生文件夹下有一个工程文件sjt4.vbp，请在窗体上画两个复选框，名称分别为Ch1、Ch2，标题分别为“程序设计”、“数据库原理”；然后画一个文本框，名称为Text1；再画一个命令按钮，名称为C1，标题为“确定”（如图1－157所示）。
国家二级VB机试(上机操作)模拟试卷238(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷238(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上添加一个计时器控件，名称为Timerl。
请利用属性窗口设置适当属性，使得在运行时可以每隔1秒，调用计时器的Timer。
事件过程一次。
另外，请把窗体的标题设置为“题目2”。
设计阶段的窗体如图2一16所示。
注意：保存时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sitl．frm。
(2)在名称为Forml的窗体上画一个文本框，名称为Text1，无初始内容；再画一一个图片框，名称为P1。
请编写适当的事件过程，使得在运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容，运行时的窗体如图2—17所示。
程序中不能使用任何变量。
注意：保存时必须存放在考生文件夹下，工程文件名为sit2．vbp，窗体文件名为sit2．frm正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表3．10在窗体中画出控件并设置其相关属件。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表3-11在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写命令按钮的单击事件过程。
参考代码：PriVate Sub Text1—Change( ) P1．Print Text1．Text End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sit3．frm。
在窗体上有一个命令按钮，其名称为Command1，标题为“添加”；有一个文奉框，名称为Text1，初始内容为窄白；有一个列表框，名称为List1。
程序运行后，在文本框中输入一个英文句子(由多个单词组成，各单词之间用一个空格分开)，然后单击“添加”按钮，程序将把该英文句子分解为单词，并把每个单词作为一个项目添加到列表框中，如图2-195所示。
国家二级VB机试(上机操作)模拟试卷511(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷511(题后含答案及解析)题型有：1.vbp，窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上画一个文本框，名称为Text1，其宽度为1000；再画一个滚动条，名称为HS1。
其刻度值的范围是1000～2000。
请编写滚动条的Change 事件过程，程序运行后，如果移动滚动框，则可按照滚动条的刻度值改变文本框的宽度。
运行时的窗体如图1－61所示。
程序中不能使用任何变量，事件过程中只能写一条语句。
注意：保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表2－9在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个水平滚动条和一个文本框，在属性设置窗口中设置其相关属性，其属性及值如表2－10所示。
步骤2：双击窗体Form1上的水平滚动条，打开代码编辑窗口，输入以下代码：参考代码：Private Sub HS1_Change( ) Text1.Width = HS1.Value End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．（1）在考生文件夹下有一个工程文件sjt3.vbp，窗体上有两个列表框，名称分别为List1、List2，在List2中已经预设了内容；还有两个命令按钮，名称分别为C1、C2，标题分别为“添加”、“清除”，如图1－62 所示。
程序的功能是在运行时，如果选中右边列表框中的一个列表项，单击“添加”按钮，则把该项移到左边的列表框中；若选中左边列表框中的一个列表项，单击“清除”按钮，则把该项移回右边的列表框中。
文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。
既不能修改程序中的其他部分，也不能修改控件的属性。
国家二级VB机试(上机操作)模拟试卷165(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷165(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1、标题为“球类项目没有最大化和最小化按钮的窗体上画1个名称为Combo1的组合框。
组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。
运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1、标题为“转换”的窗体上，画1个名称为Shape1、边框宽度为3的形状。
再画两个标题分别为“椭园”和“圆”的命令按钮。
如下图所示。
要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shape1的形状变换为椭圆；单击“圆”按钮时，Shape1的形状变换为圆。
程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为st2．frm。
正确答案：(1)【操作步骤】步骤1：新建一个空白窗体，设置窗体的属性，属性设置如表4．5所示。
步骤2：添加一个组合框控件，设置控件的属性，属性设置如表4．6所示。
完成设置后界面效果如图4．3所示。
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
(2)【操作步骤】步骤1：新建一个空白窗体，设置窗体的属性，属性设置如表4．7所示。
步骤2：向窗体中添加一个形状控件和两个命令按钮，设置好控件的属性值，属性设置如表4．8所示。
步骤3：双击“椭圆”按钮，打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。
参考答案Private Sub Command1_Click( ) Shapel．Shape＝2 End Sub 步骤4：双击“圆”按钮，打开代码编辑窗口，在代码编辑窗口指定位置编写以下代码。
PriVate Sub Command2_Click( ) Shapel．Shape＝3 End Sub 步骤5：调试并运行程序，单击“椭圆”按钮，如图4．4所示，单击“圆”按钮，如图4．5所示，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷438(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷438(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1，标题为“框架”的窗体上添加一个名称为Framel，且标题为空的框架。
框架内含有两个单选按钮，名称分别为Optl和Opt2，其标题分别为“字体”、“大小”。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。
(2)考生文件夹下的工程文件sjt2．vbp中有一个由直线Line1、Line2和Line3组成的三角形，直线Line1、Line2和Line3的坐标值如下所示：名称X1 Y1 X2 Y2 Line1 600 1200 1600 300 Line2 600 1200 2600 1200 Line3 1600 300 2600 1200 要求添加一条直线Line4以构成三角形的高，且该直线的初始状态为不可见。
再添加两个命令按钮，名称分别为Cmd1、Cmd2，标题分别为“显示高”、“隐藏高”，如图所示。
请编写适当的事件过程使得在程序运行时，单击“显示高”按钮，则显示三角形的高；单击“隐藏高”按钮，则隐藏三角形的高。
注意：要求程序中不得使用变量，每个事件过程只能写一条语句。
不得修改已经存在的控件，最后将修改后的文件按原文件名存盘。
正确答案：(1)步骤1：建立界面，添加相应的控件并设置控件的属性。
程序中涉及的控件及属性见表3．56。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
(2)步骤l：打开sjt2工程，按照题目要求建立Line控件并设置其属性，如图3．33所示。
步骤2：按照步骤1建立其他控件并设置相关属性，程序中涉及的控件及属性见表3．57。
步骤3：打开代码编辑窗口，在指定位置编写如下代码。
参考答案Private Sub Cmdl_Click( ) Line4．Visible=True’将Line4显示End Sub Private Sub Cmd2_Click( ) Line4．Visible-False’将Line4隐藏End Sub 步骤4：调试并运行程序，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷77(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷77(题后含答案及解析)题型有：1.jpg /> 注意：存盘时，将文件保存至考牛文件火下，且窗体文件名为sjt1．frm，工程文件名为sjt1．vbp。
正确答案：审题分析本题只需按题目要求画出含四个元素的按钮数组，并分别设置相应属性。
操作步骤步骤1：新建一个“标准EXE”工程，窗体中用“复制”和“粘贴”画出控件数组并按要求设置属性。
步骤2：按要求将文件保存至考生文件夹中。
考点链接按钮控件、控件数组。
2．在名称为Form1的窗体上，画一个名称为Label1的标签，其标题为“等级考试”，能根据标题内容自动调整标签的大小，外观如图3-184所示。
再画一个名称为Timer1的计时器，其Interval属性设为0，Enabled属性设为True。
要求：编写窗体Load事件过程和计时器Timer事件过程，使得程序运行时，每隔一秒标签交替隐藏或显示一次。
注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。
要求程序中不得使用变量，每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。
正确答案：审题分析由于计时器的Interval属性初始为0，而程序一开始运行时计时器即变为可用，需在窗体的Load事件过程中用语句设置其Interval 属性值为1000。
为使标签交替显示或隐藏，每次计时器的Timer事件中都应该令标签的Visible属性取相反值。
操作步骤步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：在代码编辑窗口编写窗体的Load事件和计时器的Timer事件过程。
参考代码：Private Sub Form_Load( ) Timer1．Interval=1000 End Sub PriVate Sub Timer1_Timer( ) Label1．Visible=Not Label1．Visible End Sub 步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷282(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷282(题后含答案及解析)题型有：1.jpg />步骤2：在代码编辑窗口，去掉程序中的注释符“‘”，将问号“?”改为正确的内容。
参考代码：Form2．ShowForm1．Text1．Fontsize=List1．TextForm1．Text1．FontName=Li st2．List(List2．ListIndex)Form2．Visible=FalSe步骤3：按要求将文件保存至考生文件夹中。
第2小题步骤1：打开考生文件夹中的本题工程文件sjt4．vbp，双击“计算”按钮，打开代码编辑窗口编辑计算按钮的单击事件。
参考代码：Private Sub Command2_Click( )Dim i，j As LongIf Combo1．Text=“前50个数”Thenj=0For i=1To50j=j+a(i)Nextj=Round(j／50，0)Text1．Text=jEnd IfIf Combo1．Text=“前80个数”Thenj=0For i=1To80j=j+a(i)Nextj=Round(j／80，0)Text1．Text=jEnd IfIf Combo1．Text=“所有数”Thenj=0For i=1To100j=j+a(i)Nextj=Round(j／100，0)Text1．Text=jEnd IfEnd Sub步骤2：按要求将文件保存至考生文件夹中。
步骤3：运行程序，单击“读入数据”按钮，然后在列表框中选中一项，并单击“计算”按钮获得一个结果，然后使用窗体右上角的“关闭”按钮结束程序。
解析：第1小题：根据题目要求，单击“格式”菜单项即会显示Form2，则在该菜单项的单击事件中应该调用Form2．Show方法；在“确定”按钮的单击事件中，应该对应将文本框中内容的字体和字号设置为列表框中选中的项并隐藏Form2。
第2小题：本题是一个简单的累加求和再求平均值的问题，根据在组合框中选择的列表项不同，进行计算的项数也不同，但都是用循环完成．在循环中实现累加，在循环后实现求平均值，区别只在于循环的次数不一样。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
全国计算机等级考试二级VB上机题库(一)图1 图2T1.width=T1.width+1400T1.Height=T1.Height+400T1.fontsize=T1.fontsize*3最后单击保存按钮，工程命名为sjt1.vbp,窗体命名为sjt1.frm。
Text1.text=LCase(Text1.text)Text2.text=UCase(Text1.text)一、简单应用题（2小题，每小题20分，共计40分）1.在考生目录下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。
包含所有控件和部分程序，如图所示。
要求：1)利用属性窗口向列表框添加四个项目：Visual Basic,Turbo C,C++,Java;2)请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮Option1,然后单击“确定”命令按钮，则文本框中显示“XXX笔试”；当选择列表框中的一项和单选按钮Option2，然后单击“确定”命令按钮，则文本框中的一项和单选按钮Option2，然后单击“确定”命令按钮，则文本框中显示“XXX上机”。
其中“XXX”是在列表框中所选择的项目。
If Option1.Value=True thenText1.Text=List1.List(List1.ListIndex)+Option1.CaptionEnd IfIf Option2.Value=True thenText1.Text=List1.List(List1.ListIndex)+Option2.CaptionEnd If最后单击保存按钮。
2．在考生目录下有一个工程文件sjt4.vbp，相应的窗体文件为sjt4.frm。
在窗体上已经有一个命令按钮。
其名称为Command1,标题为“计算并输出”；程序运行后，如果单击命令按钮，程序将计算500以内两个数之间（包括开头和结尾的数）所有连续数的和为1250的正整数，并在窗体上显示出来，这样的数有多组，程序输出每组开头和结尾的正整数，并用“～”连接起来,如图所示，这个程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的？该为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。
最后把修改的文件按原文件存盘。
Private Sub Command1_Click()Dim i As Integer, j As Integer, iSum As IntegerPrint "连续和为1250的正整数是："For i = 1 To 500' isum = 0 赋初值For j = i To 500' iSum = j+iSum进行累加If iSum >= 1250 Then Exit ForNext' If iSum = 1250 Then 和是否为1250Print i; " ～ "; jEnd IfNextEnd Sub答案为：1）2)j+iSum 3)1250二、综合应用题（1小题，计40分）在窗体上画一个文本框，名称为Text1,初始内容为空白，并设置多行显示格式；然后再画两个命令按钮，其名称分别为Command1和Command2,标题分别为“显示”和“保存”，如图所示，编写适当的事件过程。
程序运行后，如果单击“显示”命令按钮，则读取考生目录下的in5.txt文件，并在文本框中显示出来，该文件是一种用随机存取方式建立的文件，共有5个记录，要求按记录号顺序显示全部记录，每个记录一行；如果单击“保存”命令按钮，则把所有记录保存到考生目录下的顺序文件out5.txt中。
随机文件in5.txt中的每个记录包括3个字段，分别为姓名、性别和年龄，其名称和长度分别为：Name 字符串 8Sex 字符串 4Age Integer其类型定义为：Private Type StudInfoName As String*8Sex As String*4Age As IntegerEnd Type要求：1)文件out5.txt以顺序存取方式建立和保存。
2)存盘时必须放在考生目录下，工程为sjt5.vbp，窗体文件名为sjt5.frm。
Private Type StudInfoName as string*8Sex as string*4Age as integerEnd TypeDim pers as studinfoDim recmum as integer显示按钮脚本：Private sub command1_click()Open app.path+”\in5.txt” for random as #1 Len=len(pers)recnum=lof(1)/len(pers)ClsFor i=1 to recnumGet #1,,persText1.text=text1.text++pers.sex+str(pers.age)+vbcrlf Next iClose 1End sub保存按钮脚本：Private sub command2_click()Open app.path+”\out5.txt” for output as #1Print #1,text1.textClose #1End sub（1）在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。
在名称为Form1的窗体上有一个名称为Text1的文本框和名称为Command1、标题为"确定"的命令按钮，一个名称为List1的列表框和两个名称分别为Option1和Option2、标题分别为"添加"和"删除"的单选按钮，如图1所示。
程序运行后，如果选择单选按钮Option1并在文本框中输入一个字符串，然后单击"确定"命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图2所示；如果选择列表框中的一项和单选按钮Option2，并单击"确定"命令按钮，则删除列表框中所选择的项目，如图3所示；如果不选择列表框中的项目，或者没有在文本框中输入字符串，则单击"确定"命令按钮后，将显示一个信息框"未输入或未选择项目"，如图4所示。
该程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。
最后用原来的文件名保存工程文件和窗体文件。
********************************************************************* *（2）在考生文件夹下有一个工程文件sjt4.vbp，相应的窗体文件为sjt4.frm。
在窗体上有一个命令按钮，其名称为Command1，标题为"计算"。
程序运行后，如果单击命令按钮，程序将根据下面的公式计算π的值：π/4 = 1 - 1/3 + 1/5 - 1/7 + ......所提供的窗体文件已给出了命令按钮的事件过程，程序运行结果如图所示。
该程序不完整，请把它补充完整。
要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。
最后用原来的文件名保存工程文件和窗体文件。
第一小题：该题考查考生对ListBox控件的使用。
列表框的AddItem方法用来在列表框中插入一行文本，其语法为：列表框名.AddItem 字符串 [,索引值]如果省略"索引值"，则字符串被添加到列表框的尾部；使用"索引值"可以将字符串插入列表框中的指定位置。
"索引值"从0开始，到列表项总数-1止。
列表框的RemoveItem方法用来删除列表框中的指定项目，其语法为：列表框名.RemoveItem 索引值列表框的ListIndex属性用来设置或返回列表框中当前选中的列表项。
第二小题：该题考查了Do-Loop循环结构语句和公式计算的算法实现，相关程序如下：Private Sub Command1_Click()Dim Result As DoubleDim Sign As IntegerDim i As IntegerResult = 0Sign = 1i = 1DoResult = Result + Sign / ii = i + 2Sign = -SignLoop While 1 / i >= 0.0001Text1.Text = Result * 4End Sub3. 综合应用（1小题，计30分）注意：下面出现的"考生文件夹"均为%USER%在考生文件夹下有一个工程文件sjt5.vbp，相应的窗体文件为sjt5.frm。
窗体外观如图1所示。
三个命令按钮的名称分别为Command1、Command2和Command3，标题分别为"读取数据"、"首字母大写"和"存盘"。
程序运行后，如果单击"读取数据"命令按钮，则读取考生文件夹下in5.txt中的全部文本（文本中的单词与单词之间或标点符号与单词之间均用一个空格分开），并在文本框中显示出来，如图2所示；如果单击"首字母大写"命令按钮，则将文本框中每个单词的第一个字母变为大写字母（如果原来已是大写字母则不改变），并在文本框中显示出来，如图3所示；如果单击"存盘"命令按钮，则把文本框中的内容（首字母大写后）保存到考生文件夹下的文件out5.txt中。
窗体文件中已给出了部分程序，请把它补充完整，使其实现上述功能。
要求：1）编写"读取数据"命令按钮的Click事件过程。
2）去掉"首字母大写"命令按钮和"存盘"命令按钮事件过程中的注释符，把程序中的？改为正确的内容，使其能正确运行。
3）用原来的文件名保存工程文件和窗体文件。
本题主要考查了文件的操作，文件中字符串的处理方法。
主要代码如下：Dim s As StringPrivate Sub Command1_Click()Open "in5.txt" For Input As #1s = Input$(LOF(1), 1)Close #1Text1.Text = sEnd SubPrivate Sub Command2_Click()Dim oldSen As StringDim newSen As StringDim ch As StringDim lastCh As StringoldSen = Text1.Textstrlen = Len(oldSen)lastCh = Left(oldSen, 1)For i = 1 To strlench = Mid(Text1.Text, i, 1) If lastCh = " " Thench = UCase(ch)End IfnewSen = newSen & chlastCh = chNext iText1.Text = newSenEnd SubPrivate Sub Command3_Click()Open "out5.txt" For Output As #1 Write #1, Text1.TextClose #1End Sub答案：Dim a(10) As IntegerDim b(10) As IntegerDim c(10) As IntegerPrivate Sub Command1_Click()Open App.Path & "\dataA.txt" For Input As #1 Open App.Path & "\dataB.txt" For Input As #2For i = 0 To 9Input #1, a(i)Input #2, b(i)NextClose #1, #2End SubPrivate Sub find(x() As Integer, t As Control) Dim i As Integer, max As Integermax = x(1)For i = 2 To 10If max < x(i) Then max = x(i)Next it.Text = maxEnd SubPrivate Sub Command2_Click()Dim i As IntegerFor i = 1 To 10c(i) = a(i) + b(i)Next iOpen App.Path & "\out51.txt" For Output As #1For i = 0 To 9Print #1, c(i)NextClose #1End SubCall find(a, Text1)Call find(c, Text2)Open App.Path & "\out52.txt" For Output As #1Print #1, Text1.Text, Text2.TextClose #1End Sub编写适当的事件过程，使程序运行后，可以使图像框闪烁，其闪烁速度可以通过滚动条来调节。