1、VB 机试-试卷 63 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.有一个工程文件 ylc.vbp(相应的窗体文件名为 ylc5.frm)，在窗体上画一个名为 List1 的列表框和一个名为 Text1 的文本框。编写窗体的 MouseDown 事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图 23 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc5.vbp，窗体文件名为
2、 ylc5.frm。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.在考生文件夹中有一个工程文件 execise27.vbp，相应的窗体为 execise27.frm。在名为 Form1 的窗体中有一个名称为 Cmd1 的命令按钮(标题为“开始倒计数”)和一个名称为 Timer1 的计时器。请在窗体上绘制一个标签(名称为 Lab1，标题为“请输入一个正整数”)、一个文本框(名称为 Text1，初始内容为空白) (如下图所示)。已经给出了相应的事件过程。 程序运行后，在文本框中输入一个正整数，此时如果按回车键，则可使文本框中的数字每隔
3、1 秒减 1(倒计数)：当减到 0 时，倒计数停止，清空文本框，并把焦点移到文本框中。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在窗体 Form1 上建立 3 个菜单(名称分别为 vbRead、vbCalc 和 vbSave，标题分别为“读数”、“计算”和“存盘”)，然后绘制一个文本框(名称为 Text1，MultiLine 属性设置为 True，ScrollBars 属性设置为2)，如下图所示。 （分数：2.00）_VB 机试-试卷 63 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.
4、00)1.基本操作题（）（分数：2.00）_解析：2.有一个工程文件 ylc.vbp(相应的窗体文件名为 ylc5.frm)，在窗体上画一个名为 List1 的列表框和一个名为 Text1 的文本框。编写窗体的 MouseDown 事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图 23 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc5.vbp，窗体文件名为 ylc5.frm。 （分数：2.00）_正确答案：(正确答案：1操作步骤 (1)在 Visual Basi
5、c 集成环境选择“文件”“打开工程”命令，在对话框中选择 ylc5.vbp 工程文件，单击“确定”按钮打开。 (2)在工具箱中选择 ListBox 控件，在窗体上创建该控件，命名为 List1。在工具箱中选择 TextBox 控件，在窗体中创建并命名为 Text1，标题为空。 2行为编码 在代码窗口选择 Form 对象的 MouseDown 事件，其行为代码如下： Private Sub Form MouseDown(Button As Integer，Shift As Integer，_ X As Single，Y As Single) Select Case Button 若按下的是鼠标左
6、键 Case 1 将文本框中的内容加入列表框 List1.Addltem，(Text1.Text) 清空文本框 Text1. Text=“ “ 若按下的是鼠标右键 Case 2 删除列表框中与文本框相同的内容 For i=0 To List1.ListCount-1 If List1.List(i)=Text1.Text Then List1.Removeltem(i) Exit For End If Next i End Select End Sub 3存盘保存 执行“文件”“保存工程”命令，工程文件名为ylc5.vbp，窗体文件名为 ylc5.frm。)解析：解析：(1)本题考查考生对 L
7、istBox 控件的属性控制和操作，特别对鼠标按键的控制进行了仔细的考查。(2)注意使用 ListBox 控件的 AddItem、RemoveItem 方法、鼠标消息的控制。(3)本题是根据键码的值，使用 Select 语句来判断按下的是鼠标左键或右键。二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_解析：4.在考生文件夹中有一个工程文件 execise27.vbp，相应的窗体为 execise27.frm。在名为 Form1 的窗体中有一个名称为 Cmd1 的命令按钮(标题为“开始倒计数”)和一个名称为 Timer1 的计时器。请在窗体上绘制一个标签(名称为
8、 Lab1，标题为“请输入一个正整数”)、一个文本框(名称为 Text1，初始内容为空白) (如下图所示)。已经给出了相应的事件过程。 程序运行后，在文本框中输入一个正整数，此时如果按回车键，则可使文本框中的数字每隔 1 秒减 1(倒计数)：当减到 0 时，倒计数停止，清空文本框，并把焦点移到文本框中。 （分数：2.00）_正确答案：(正确答案： )解析：三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_解析：6.在窗体 Form1 上建立 3 个菜单(名称分别为 vbRead、vbCalc 和 vbSave，标题分别为“读数”、“计算”和“存盘”)，然后绘制一个文本框(名称为 Text1，MultiLine 属性设置为 True，ScrollBars 属性设置为2)，如下图所示。 （分数：2.00）_正确答案：(正确答案： )解析：
