2015年计算机二级考试《VB》机考操作试题(3)
基本操作题，请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)
1在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，初始内容均为空;再建立一个下拉菜单，菜单标题为“操作”，名称为Ml，此菜单下含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序运行时，单击“复制”选项菜单，则把Textl中的内容复制到Text2中，单击“清除”选项菜单，则清除Text2中的内容(即在Text2中填人空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sit2.frm。
【考点分析】本题考点有：菜单编辑器的使用(标题、名称、内缩符号)，菜单Click事件以及文本框的Text和Name属性。
【解题思路】在编辑窗体中单击鼠标右键选择“菜单编辑器”来创建菜单，在菜单的Click事件中，通过对Text2.Text属性的设置来完成对内容的清除和复制。
【操作步骤】
步骤1：新建窗体，按表3.2建立菜单项并设置其属性，如图3.7所示。
步骤2：同步骤1，输入第3项的标题和名称，单击确定即可。
步骤3：添加文本框控件，按表3.3设置文本框的属性。
步骤4：打开代码编写窗口，编写程序代码，如图3.8所示。
参考答案
Private Sub Clear_Click()
Text2.Text=””
End Sub
Private Sub Copy_Click()
Text2.Text=Textl.Text
End Sub
步骤5：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】在清除文本框Text2的内容时不能使用cls方法，必须通过赋值空字符串来实现，在赋值过程时，注意要在英文状态下编写代码，区分“"和"”。
2在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性，满足如下要求：
①Text2可以显示多行文本，并且有垂直和水平两个滚动条;
②程序运行时在Textl中显示输入的字符为“*”。
程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl.vbp，窗体文件名保存为sjtl.frm。
【考点分析】本题考点有：窗体的Caption属性，文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。
【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本，值为True表示是，值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条，它有0、l、2和3这4个值，0表示没有滚动条(默认值)，1表示只有水平滚动条，2表示只有垂直滚动条，3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容，常用于口令输入。
【操作步骤】
步骤1：新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控件及属性见表3.8和表3.9。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】由于ScrollBars属性的设置值较多，易混乱，请考生牢记4个值分别设置的文本框滚动条属性。
简单应用题
3在考生文件夹下有一个工程文件sjr4.vbp。窗体上的控件如图所示。程序运行时，若选中“累加”单选按钮，则“10”、“l2”菜单项不可用，若选中“阶乘”单选按钮，则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后，单击“计算”按钮，则相应的计算结果在文本框中显示(例如，选中“累加”和“2000”，则计算1+2+3+…+2000，选中“阶乘”和“10”，则计算10!。单击“存盘”按钮则把文本框中的结果保存到考生文件夹下的out4.dat文件中。
要求：编写“计算”按钮的Click事件过程。
注意：不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。
【考点分析】本题考点有：单选按钮的Value属性、菜单项的Enabled属性、菜单编辑器的使用、文件编辑、文本框的Text属性、For循环语句、If判断语句以及App.Path相对路径。
【解题思路】本题的语句比较多，先看一下程序实现的过程，通过单选按钮决定是进行阶乘还是累加运算，并确定4个菜单项的Enabled属性，在菜单项的Click事件过程中，设置n的值，运用If判断语句判断n值，进行累加或阶乘运算，然后通过文件编辑实现存盘操作。
【操作步骤】
步骤1：打开本题工程文件;
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案：
步骤3：调试并运行程序.关闭程序后按题目要求存盘。
4在考生文件夹下有一个工程文件sit3.vbp(相应的窗体文件名为sit3.frm)，在窗体上添加一个名称为Listl的列表框和一个名称为Textl的文本框，如图1所示。编写窗体的MouseDown事件过程。程序运行后，如果用鼠标单击窗体，则从键盘上输入要添加到列表框中的项目(内容任意，不少于三个);如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表框中删除。程序的运行情况如图2所示。这个程序不完整，请把它补充完整，并能正确运行。
要求：去掉程序中的注释符，把程序中的?改为适当的内容，使其正确运行，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
【考点分析】本题考点有：列表框的Name、List和ListCount属性，文本框的Name和Text属性，Removehem方法，InputBox函数，For循环语句以及If判断语句。
【解题思路】当在窗体上按下鼠标键时将触发其Mouse-Down事件，该事件过程的参数Button值为1时表示当前按下的是鼠标左键;当Button值为2时表示当前按下的是鼠标右键。向列表框添加项目使用Addhem方法，删除列表项使用Removehem方法。当执行删除操作时，本题在For循环语句中逐一判断列表中各项是否与输入内容一致，若一致则删除列表框中该项。
程序中用到了InputBox()函数，其格式为：
InputBox(prompt[，title][，default][，xpos][，ypos][，helpfile，context])
其中常用参数为prompt和title。prompt是一个字符串，其长度不得超过1024个字符，它是在对话框内显示的信息，用来提示用户输入。
title：是一个字符串，它是对话框的标题，显示在对话框顶部的标题区。
【操作步骤】
步骤1：打开本题工程文件，按表3.18所列在窗体画出控件并设置其属性。
步骤2：打开代码编辑窗口，去掉程序中的注释符“´”，将问号改为正确的内容。
参考答案(横线部分是需考生填入的内容)
Private Sub Form_MouseDown (Button As Integer，Shift As Integer，X As Single，Y As Single)
If Button=1 Then
Text1.Text=InputBox("请输入要添加的项目")
List1.AddItem___Text1.Text_______´将Textl中的内容加入列表
End If
If Button=2 Then
Text1.Text=InputBox("请输入要删除的项目")
´列表总数用LiStCount求得
For =0 To_____List1.ListCount-1_____
´判断列表项是否为要删除的项
If List1.List(i)=____Text1.text______
Then
´删除i所对应的项
List1.RemoveItem____i______
End If
Next i
End If
End Sub
程序结束
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】列表数组List(i)下标从0开始，列表项的循环上限应为ListCount-1，要注意InputBox语句的格式。
综合操作题
5在考生文件夹下有一个工程文件sjt5.vbp，其窗体上有两个标签L1和L2，标题分别为“口令”和“允许次数”;一个命令按钮c1，标题为“确定”;两个文本框名称分别为Text1和Text2。其中Textl用来输入口令(输入时，文本框内容显示“*”)，初始内容为空;Text2的初始内容为3。并给出了c1的事件过程，但不完整，要求去掉程序中的注释符，把程序中的?改为正确的内容，使得程序运行时，在Textl中输入口令后，单击“确定”，如果输入的是“l23456”则在Textl中显示“口令正确”;如果输入其他内容，单击“确定”后，弹出错误提示对话框(如图所示)，并且Text2中的数字减1。最多可输入3次口令，若3次都输入错误，则禁止再次输入。
注意：不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
【考点分析】本题考点有：文本框的Text、PasswordChar和Enabled属性，&连接符以及MsgBox()函数。
【解题思路】本题通过判断文本框Textl输入的密码是否为“123456”执行不同的操作。每输入…次错误密码，将提示重新输人，直到文本框Text2中的数值为0时，则提示错误，并禁用文本框Textl。
【操作步骤】
步骤1：打开本题工程文件，将文本框Textl的Password-Char属性设置为“*”。
步骤2：打开代码编辑窗口，去掉程序中的注释符，将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容)
步骤3：调试并运行程序，关闭程序后按题目要求存盘。