1、二级 VISUAL+BASIC 机试-45 及答案解析(总分：100.00，做题时间：90 分钟)1.在考生文件夹下完成如下简单应用：1有一个工程文件 ylc.vbp(相应的窗体文件名为 ylc5.frm)，在窗体上画一个名为 List1 的列表框和一个名为 Text1 的文本框。编写窗体的 MouseDown 事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图 23 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc5.vbp，窗体文件名为 ylc5.frm。（分数
2、：50.00）_2.有一个工程文件 ylc6.vbp，窗体上已经有两个文本框，名称分别为 Text1、Text2。在窗体上创建一个命令按钮，名称为 Command1，标题为“确定”。画两个单选按钮，分别为“王老师”、“林老师”；再画两个复选框，名称分别为 Check1、Check2，标题分别为“语文”、“数学”。编写适当的事件过程，使得在运行时，单击“确定”按钮后实现下面的要求。根据选中的单选按钮，在 Text1 中显示“我是王老师”或“我是林老师”。根据选中的复选框，在 Text2 中显示“我教语文”、“我教数学”、“我教语文数学”，如图 24 所示。注意：存盘时必须存放在考生文件夹下，工程
3、文件名为 ylc6.vbp，窗体文件名为 ylc6.frm。（分数：50.00）_二级 VISUAL+BASIC 机试-45 答案解析(总分：100.00，做题时间：90 分钟)1.在考生文件夹下完成如下简单应用：1有一个工程文件 ylc.vbp(相应的窗体文件名为 ylc5.frm)，在窗体上画一个名为 List1 的列表框和一个名为 Text1 的文本框。编写窗体的 MouseDown 事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图 23 所示。注意：存盘时必须存放在考生
4、文件夹下，工程文件名为 ylc5.vbp，窗体文件名为 ylc5.frm。（分数：50.00）_正确答案：(操作步骤(1)在 Visual Basic 集成环境选择“文件”“打开工程”命令，在对话框中选择 ylc5.vbp 工程文件，单击“确定”按钮打开。(2)在工具箱中选择 ListBox 控件，在窗体上创建该控件，命名为 List1。在工具箱中选择 TextBox 控件，在窗体中创建并命名为 Text1，标题为空。2行为编码在代码窗口选择 Form 对象的 MouseDown 事件，其行为代码如下：Private Sub Form_MouseDown(Button As Integer，S
5、hift As Integer，_X As Single，Y As Single)Select Case Button若按下的是鼠标左键Case 1将文本框中的内容加入列表框List1.Addltem，(Text1.Text)清空文本框Text1. Text=“ “若按下的是鼠标右键Case 2删除列表框中与文本框相同的内容For i=0 To List1.ListCount-1If List1.List(i)=Text1.Text ThenList1.Removeltem(i)Exit ForEnd IfNext iEnd SelectEnd Sub3存盘保存执行“文件”“保存工程”命令，工
6、程文件名为 ylc5.vbp，窗体文件名为 ylc5.frm。)解析：解析 (1)本题考查考生对 ListBox 控件的属性控制和操作，特别对鼠标按键的控制进行了仔细的考查。(2)注意使用 ListBox 控件的 AddItem、RemoveItem 方法、鼠标消息的控制。(3)本题是根据键码的值，使用 Select 语句来判断按下的是鼠标左键或右键。2.有一个工程文件 ylc6.vbp，窗体上已经有两个文本框，名称分别为 Text1、Text2。在窗体上创建一个命令按钮，名称为 Command1，标题为“确定”。画两个单选按钮，分别为“王老师”、“林老师”；再画两个复选框，名称分别为 Che
7、ck1、Check2，标题分别为“语文”、“数学”。编写适当的事件过程，使得在运行时，单击“确定”按钮后实现下面的要求。根据选中的单选按钮，在 Text1 中显示“我是王老师”或“我是林老师”。根据选中的复选框，在 Text2 中显示“我教语文”、“我教数学”、“我教语文数学”，如图 24 所示。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc6.vbp，窗体文件名为 ylc6.frm。（分数：50.00）_正确答案：(1操作步骤(1)在 Visual Basic 集成环境选择“文件”“打开工程”命令：在对话框中选择 ylc6.vbp 工程文件，单击“确定”按钮打开。(2)在工具箱中选
8、择 OptionButton，在窗体上创建两个单选按钮命名为 Option1 和 Option2。在属性窗口中分别设置按钮的标题为“王老师”和“林老师”。在同一个窗体上创建，因此只能二选一。(3)在工具箱中选择 CheckBox 控件，在窗体上创建两个复选按钮，命名为 Check1 和 Check2。在属性窗口中，设置标题为“语文”、“数学”。(4)根据题目要求，创建命令按钮命名为 Command1，在属性窗口设置其标题为“确定”。2行为编码在代码窗口设置选择 Command1 和 Click 事件代码，其行为代码如下：Private Sub Command1_C1ick()If option
9、1. Value ThenText1.Text=“我是“& Optionl.CaptionElseText1.Text=“我是“ & Option2.CaptionEnd IfIf(Check1.Value And Check2.Value)ThenText2.Text=“我教“ & Check1.Caption & Check2. CaptionElseIf Check1.Value ThenText2.Text=“我教“ &Check1.CaptionElseIf Check2.Value ThenText2.Text=“我教“& Check2.CaptionElseText2.Text=“ “End IfEnd Sub3存盘保存执行“文件”“保存工程”命令，工程文件名为 ylc6.vbp，窗体文件名为 ylc6.frm。)解析：解析 (1)本题考查考生对单选按钮和复选按钮功能的使用，比较单选按钮和复选按钮的不同之处。(2)注意 OptionButton 控件、CheckBox 控件的使用，命令按钮的行为编码以及字符串的连接操作。(3)该代码根据题目的要求，通过 If 语句判断当前单选按钮的 Value 属性的值和复选按钮属性的值。通过“&”连接字符串，并通过 TextBox 控件的 Text 属性显示。
