全国计算机等级考试二级VB上机题库以及解析
国家二级VB机试(上机操作)模拟试卷83(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷83(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计’Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml、标题为“框架”的窗体上画一个名称为Framel，且没有标题的框架。
框架内含有两个单选按钮，名称分别为Opt1和Opt2、标题分别为“字体”、“大小”，如图3—163所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sitl．frm。
(2)考生文件夹下的工程文件sjt2．vbp 中有一个由直线Linel、L,ine2和L,ine3组成的三角形，直线Linel、Line2和Line3的坐标值见表3—4：要求画一条直线Line4以构成三角形的高，且该直线的初始状态为不可见。
再画两个命令按钮，名称分别是Cmdl、Cmd2，标题分别为“显示高”、“隐藏高”，如图3—164所示。
请编写适当的事件过程，使得在运行时，单击“显示高”按钮，则显示三角形的高；单击“隐藏高”按钮，则隐藏三角形的高。
注意：要求程序中不得使用变量，每个事件过程只能写一条语句。
不得修改已经存在的控件，最后将修改后的文件按原文件名存盘。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：打开本题工程文件sjt2．vbp，在窗体中按要求画出控件并设置属性。
步骤2：打开代码编辑窗口，编写命令按钮的Click事件过程。
参考代码：Prirate Sub Cmdl C1ick( ) Line4．Visible=TrueEnd SubPrirate Sub Cmd2 Ctick( ) Line4．ViSible=FalSeEnd 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小题：本题是一个简单的累加求和再求平均值的问题，根据在组合框中选择的列表项不同，进行计算的项数也不同，但都是用循环完成．在循环中实现累加，在循环后实现求平均值，区别只在于循环的次数不一样。
国家二级VB机试(上机操作)模拟试卷517(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷517(题后含答案及解析)题型有：1.vbp，窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上建立一个名称为“menu1”、标题为“文件”的弹出式菜单，含有三个菜单项，它们的标题分别为“打开”、“关闭”、“保存”，名称分别为“m1”、“m2”、“m3”。
再画一个命令按钮，名称为“Command1”、标题为“弹出菜单”。
要求：编写命令按钮的Click事件过程，使程序运行时，单击“弹出菜单”按钮即可弹出“文件”菜单（如图1－89所示）。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表2－25在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，选择【工第2小题具】→【菜单编辑器】命令，打开菜单设计器，如表2－26中的设置建立菜单项。
步骤2：在窗体上画一个名为Command1，标题为“弹出菜单”的命令按钮，打开代码编辑窗口，编写“弹出菜单”按钮的单击事件过程。
参考代码：Private Sub Command1_Click( ) Form1.PopupMenu menu1 End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．（1）在考生目录下有一个工程文件sjt3.vbp，包含了所有控件和部分程序。
程序运行时，在文本框中每输入一个字符，则立即判断：若是小写字母，则把它的大写形式显示在标签Label1中；若是大写字母，则把它的小写形式显示在Label1中；若是其他字符，则把该字符直接显示在Label1中。
输入的字母总数则显示在标签Label2 中，如图1－90所示。
要求：去掉程序中的注释符，把程序中的?改为正确的内容。
国家二级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机试(上机操作)模拟试卷600(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷600(题后含答案及解析)题型有：1.jpg /> 步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案PriVate Sub Commandl_Click( ) Text2=Textl．SelLength End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】SelLength属性与SelStart和SelText属性容易混淆，SelStart属性是返回／设置选定文本的起始点，SelText属性是返回／设置当前选定文本的字符串。
解析：selLength属性用于返回／设置选定的字符数，通过文本框的Name 和Caption属性设置文本框的名称和标题，通过命令按钮的Name和Cap．tion 属性设置命令按钮的名称和标题。
简单应用题3．在考生文件夹下有一个工程文件sjt3．vbp。
程序运行后，单击“读入数据”按钮，可将考生文件夹下in3．1xt文件中的所有英文单词读入，并在Textl 文本框中显示；单击“插入列表框”按钮，则按顺序将每个单词作为一项添加到List1列表框中(如图所示)。
在in3．txt文件中，每个单词之间用一个空格字符隔开，最后一个单词的后面没有空格。
已经给出了所有控件和程序，但程序不完整。
要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。
最后用原来的文件名保存工程文件和窗体文件。
正确答案：【操作步骤】步骤l：打开本题工程文件。
步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容) Private Sub Commandl_C1ick( ) Dim st$．ch$ Open App．Path＆＂＼in3．txt＂For In—put As#’打开文件Do While Not EOF(1)′文件指针是否到达文件末尾Input#1，ch′达到文件末尾返回true．否则返回false st=st＆ch′将读出的数据加到原有数据末尾Loop Close#1′关闭文件Textl=st′将内容显示在文本框中End Sub Private Sub Command2_Click( ) Dim st$，word$，C$ St=Textl n=Len(St) For k=1 TO n c=Mid(st，k，1)′从st 中依次取出1个字符进行比较If c＜＞＂＂Then word=word＆C E1Se Listl．AddItem word word=＂＂将word清空，为下一次作准备End If Next LiStl．AddItem word End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
国家二级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机试(上机操作)模拟试卷311(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷311(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Combo1的组合框，其宽度为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．SetFocuSEnd SubPrivate Sub Command2_Click( )Text2．SetFocusEnd Sub步骤4：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷115(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷115(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个名称为List1的列表框，在属性窗口中为列表框添加三个选项：北京、上海、天津。
再建立一个下拉菜单，菜单标题为“文件”，名称为File，此菜单下含有一个子菜单项，标题为“显示列表框”，名称为Show，初始状态为选中，运行时的效果如图3-130所示。
注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjtl．frm，工程文件名为sjtl．vbp。
(2)新建一个名称为Forml，标题为“使用输入对话框”的窗体，该窗体上无任何控件。
请编写适当的事件过程，使得运行程序并单击窗体时，出现输入对话框，该对话框的标题为“等级考试”，提示信息为“请输入”，默认值为“Basic”。
如图3．131所示。
注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sit2．frm，工程文件名为sjt2．vbp。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：新建一个“标准EXE”工程，选择【工具】→【菜单编辑器】命令，打开菜单设计器按要求设置建立菜单项。
步骤3：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，将窗体Forml的Caption属性设置为“使用输入对话框”。
步骤2：打开代码编辑窗口，编写以下事件过程：参考代码：Private Sub Form Click( )InputBox“请输入”，“等级考试”，“Basic”End Sub步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．(1)在考生目录下有一个工程文件sit3．vbp，窗体上有一个单选按钮数组，含三个单选按钮，均没有标题，请利用属性窗口，为单选按钮依次添加标题为“北京”、“上海”、“广州”；再添加一个标题为“显示”的命令按钮，如图3-18所示。
全国计算机 二级 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机试(上机操作)模拟试卷100(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷100(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个标签，名称为L1，标题为“业余爱好”，再画一个名称为Chl的复选框数组，含三．个复选框，它们的Index属性分别为0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态见表3一1。
运行后的窗体如图3-11所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
(2)在名称为Forml的窗体上画一个文本框，名称为Text1；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使得在运行时，单击“隐藏”菜单项，则文本框消失；单击“显示”菜单项，则文本框显示出来。
运行后的窗体如图3-12所示。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题本题只需按要求画出控件数组，并设置其Value属性。
【操作步骤】步骤1：新建一个“标准EXE”工程。
步骤2：在窗体Forml中加入一个标签和一个复选框，并用“复制”和“粘贴”的方法，生成包含三个元素的复选框数组。
步骤3：分别设置窗体和复选框数组中各元素的相关属性，其属性及值如表4．5所示。
步骤4：按要求将文件保存至考生文件夹中。
第2小题本题需用菜单设计器建立菜单，并编写“显示”和“隐藏”菜单项的单击事件过程控制文本框的visible属性变化。
【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Forml中画一个文本框，在属性设置窗口中将其Name属性值设置为Text1。
国家二级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机试(上机操作)模拟试卷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机试(上机操作)模拟试卷279(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷279(题后含答案及解析) 题型有：1.jpg />正确答案：第1小题步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个框架，然后在框架内加入含有3个单选按钮的控件数组。
按表4—20设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题步骤1：新建一个“标准EXE”工程，在窗体Form1中加入一个标签和两个命令按钮。
按表4—21设置其相关属性。
步骤2：在打开的代码编辑窗口中，编写命令按钮的Click事件代码。
参考代码：Private Sub Command1_Click( )Label1．FontBold=IIf(Label1．FontBold，False，True)End SubPrivate Sub Command2_Click( )Label1．FontItalic=IIf(Label1．FontItalic，False，True)End Sub步骤3：按要求将文件保存至考生文件夹中。
解析：第1小题：题目要求在窗体上加入一个框架，然后在框架里面添加一个单选按钮控件，并设置相关属性。
添加控件数组的方法是：先通过工具箱建立第1个控件，然后对该控件进行“复制”“粘贴”操作，粘贴时在弹出的对话框中选择建立控件数组，这时控件数组的Index值会自动从0开始编号。
第2小题：根据题目要求在单击命令按钮的时候，修改标签的属性，只需在命令按钮的Click 事件代码里面设置标签的属性即可。
简单应用题2．(1)在考生文件夹下有一个工程文件sjt3．vbp，窗体上有1个标题为“计算”的命令按钮，1个标题为“1!+2!+…+10!=”的标签。
请画1个名称为Text1，初始内容为空的文本框。
效果如图3—34所示。
程序功能：单击“计算”命令按钮，则计算“1!+2!+…+10!”的值，并将结果显示在Text1文本框中。
请将“计算”命令按钮的Click事件过程中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。
国家二级VB机试(上机操作)模拟试卷543(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷543(题后含答案及解析)题型有：1.vbp，窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上，画一个名称为Image1的图像框，左界为360，且图像框中显示考生文件夹下的图片文件“Duck.bmp”；再画两个名称分别为“Command1”、“Command2”，标题分别为“移动”、“复位”的命令按钮，如图1－208所示。
要求：编写适当的事件过程，使得每单击“移动”按钮一次，图像框向右移动10；单击“复位”按钮，图像框自动回位到左界为360的位置。
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，把窗体的标题改为“菜单”，然后利用菜单设计器如表2－100在窗体上建立一个二级菜单。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表2－101在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，分别编写两个命令按钮的单击事件过程。
参考代码：Private Sub Command1_Click( ) Image1.Left = Image1.Left + 10 End Sub Private Sub Command2_Click( ) Image1.Left = 360 End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．（1）考生文件夹下有一个工程文件sjt3.vbp，其中的窗体上有一个名称为Cmd的命令按钮控件数组；有一个名称为Image1的图像框。
请画一个名称为Timer1的计时器，时间间隔为3秒，初始状态为不可用，如图1－209所示。
程序功能如下：①单击“前进”按钮，则Timer1的状态变为可用，且在图像框中黄灯显示3秒（图像文件为考生文件夹下的“yellow.ico”）后，显示绿灯（图像文件为考生文件夹下的“green.ico”）直至下次单击某个命令按钮；②单击“停止”按钮，则Timer1的状态变为可用，且在图像框黄灯显示3秒后，显示红灯（图像文件为考生文件夹下的“red.ico”）直至下次单击某个命令按钮；③单击“结束”按钮，则结束程序运行。
国家二级VB机试(上机操作)模拟试卷343(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷343(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上画1个命令按钮，其名称为C1，标题为“等级考试”；再画1个文本框，名称为T1，如图3．184(a)所示。
请编写适当的事件过程，使程序运行后，一旦文本框中的信息有任何变化或输入任何信息，则命令按钮消失，并使命令按钮的标题在文本框中显示出来，如图3．184(b)所示。
注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjt1．frm，工程文件名为sjt1．vbo。
(2)在名称为Form1、标题为“菜单演示”的窗体上画一个名称为Label1、标题为空的标签；再建立一个菜单，各菜单项的属性设置见下表。
窗体外观如图3-185(a)所示。
请编写适当的程序，使得选中“输出窗体标题”菜单项时，就在标签中显示窗体标题；选中“输出当前时间”菜单项时，在标签中显示当前系统时间(如图3．185(b)所示)。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjt2．frm，工程文件名为sjt2．vbp。
正确答案：(1)步骤1：新建一个“标准EXE”工程，按要求画出控件并设置相应属性。
步骤2：打开代码编辑窗口，编写文本框的Change事件过程。
参考代码：Private Sub T1_Change( )C1．Visible=FalseT1．Text=C1．CaptionEnd Sub 步骤3：按要求将文件保存至考生文件夹中。
(2)步骤1：新建一个“标准EXE”工程，选择【工具】→【菜单编辑器】命令，打开菜单设计器，按要求设置建立菜单项。
步骤2：打开代码编辑窗口，编写两个底层菜单命令的单击事件过程。
参考代码：Private Sub Clock Click( )Label1．Caption=TimeEnd SubPrivate Sub Title Click( )Label1．Caption=Form1．CaptionEnd Sub步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷29(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷29(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Forml的窗体上画一个水平滚动条，其名称为HScrolll，Min属性为1000，Max属性为1500，LargeChange属性为50，SmallChange属性为2；然后再画一个文本框，其名称为Textl，初始内容为空白，编写适当的事件过程。
程序运行后，移动滚动框，则在文本框中显示滚动框的当前位置。
程序的运行情况如图2-156所示。
要求：①不得使用任何变量；②存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
正确答案：步骤1：新建一个”标准EXE”工程，在窗体Forml中画一个文本框和一个水平滚动条，在属性设置窗口中设置其相关属性，其属性及值如表3-88所示。
步骤2：双击窗体Forml上的水平滚动条，打开代码编辑窗口，在其Change事件过程中输入以下代码：参考代码：Private Sub HScrolll_Change( )Textl=HSCrolllEnd Sub步骤3：按要求将文件保存至考生文件夹中。
2．在名称为Forml的窗体上画一个命令按钮，其名称为C1、标题为”移动”，位于窗体的左上部，如图2-157(a)所示，编写适当的事件过程。
程序运行后，每单击一次窗体，都使得命令按钮同时向右、向下移动100。
程序的运行情况如图2-157(b)所示。
要求：不得使用任何变量；存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：步骤1：新建一个”标准EXE”工程，如表3-89在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写窗体的单击事件过程。
参考代码：Private Sub Form_Click( )Forml．C1．Left=1 0 0+Me．C1．LeftMe．C1．Top=100+Forml．C1．TopEnd Sub步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷178(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷178(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)住名称为Forml的窗体上画两个文本框，其名称分别为Text1和Text2，它们的高、宽分别为300、2400和1200、2400。
窗体的标题为“窗口”。
请通过属性窗口设置适当的属性满足以下要求：①Text2可以显示多行文本，且有垂直和水平两个滚动条；②运行时在Text1中输入的字符都显示为“*”。
运行后的窗体如图2．148所示。
注意：存盘时必须存放在考生文件夹下，上程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Forml的窗体卜画一个图像框，名称为Imagel，其高、宽分别为1 900、1700，通过属性窗口把考生文件火下的图像文件picl．bmp装入图像框；再画两个命令按钮，名称分别为C1、C2，标题分别为“放大”、“缩小”，如图2-149所示。
要求：①清编写适当的事件过程，税序运行后，如果单击“放大”按钮，则把图像框的高度、宽度均增加100；单击“缩小”按钮，则把图像框的高度、宽度均减少100。
要求程序中不得使用任何变量。
②通过属性窗口设置图像框的适当属性，使得在放大、缩小图像框时，其中的图像也自动放大、缩小。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工柙，在窗体Form1中画两个文本框，并分别设置它们的相关属性，其属性及值如表3．79所示。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表3．80在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写两个命令按钮的Click事件过程。
国家二级VB机试(上机操作)模拟试卷528(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷528(题后含答案及解析)题型有：1.vbp，窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上画一个列表框，其名称为L1；一个水平滚动条，其名称为HS1，SmallChange 属性为2，LargeChange属性为10，Min属性为0，Max属性为100，编写适当的事件过程。
程序运行后，如果把滚动框移到某个位置，然后单击窗体，则在列表框中添加一个项目，其内容是“xx”，其中xx是滚动框所在的位置，如图1－137所示。
注意：程序中不要使用变量；存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表2－53在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写如下事件过程。
参考代码：Private Sub C1_Click( ) C2.Visible = True C1.Visible = False End Sub Private Sub C2_Click( ) C1.Visible = True C2.Visible = False End Sub 步骤3：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表2－54在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写窗体的Click事件过程。
参考代码：Private Sub Form_Click( ) L1.AddItem Str$(Form1.HS1) End Sub 步骤3：按要求将文件保存至考生文件夹中。
简单应用题2．（1）在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm，在窗体上有一个命令按钮和一个文本框。
程序运行后，单击命令按钮，即可计算出数组arr 中每个元素与其下标相除所得的和，并在文本框中显示出来。
- 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 和是否为1250 Print 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 #1Write #1, Text1.TextClose #1End Sub第10 页共13答案：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 SubPrivate Sub Command3_Click()Call find(a, Text1)Call find(c, Text2)Open App.Path & "\out52.txt" For Output As #1 Print #1, Text1.Text, Text2.TextClose #1End Sub编写适当的事件过程，使程序运行后，可以使图像框闪烁，其闪烁速度可以通过滚动条来调节。