1、VB机试模拟试卷 44及答案与解析 一、基本操作题（ 30分） 1 有一个工程文件 ylc.vbp(相应的窗体文件名为 ylc5.frm)，在窗体上画一个名为List1的列表框和一个名为 Text1的文本框。编写窗体的 MouseDown事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图 23所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为 ylc5.frm。 VB机试模拟试卷 44答案与解析 一、基本操作题（ 30分） 1 【正确答案】 1操
2、作步骤 (1)在 Visual Basic集成环境选择 “文件 ”“ 打开工程 ”命令，在对话框中选择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) Selec
3、t Case Button 若按下的是鼠标左键 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)本题考查考生对 ListBox控件的属性控制和操作，特别对鼠标按键的控制进行了仔细的考查。 (2)注意使用 ListBox控件的 AddItem、 RemoveItem方法、鼠标消息的控制。 (3)本题是根据键码的值，使用 Select语句来判断按下的是鼠标左键或右键。
