2014计算机等级《二级VB》上机考试预测题及答案2

　　41

　　(1)在窗体上画一个列表框，名称为Lst1，通过属性窗口向列表框中添加3个项目，分别为"Item1、"Item2"和"Item3"。编写适当的事件过程。使程序运行后，如果双击Form1空白处，则清空列表框中的内容。程序运行时窗体界面如图47-1和图47-2所示。

　　图47-1

　　图47-2

　　注意：存盘时必须存放在考生文件夹下，工程文件名为sj1.vbp，窗体文件名为sj1.frm。

　　(2)在窗体上画两个命令按钮，名称分别为Command1、Command2、标题分别为"启用"、"禁用"，一个名称为Text1的Text控件。请编写适当的事件过程，使得程序在运行时，单击"启用"按钮，Text1会变为有效，而当单击"禁用"命令按钮Text1变为无效。程序中不得使用任何变量，程序运行时的窗体界面如图47-3和图47-4所示。

　　图47-3

　　图47-4

　　注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。参考答案:请参考解析 系统解析:

　　(1)列表框控件用于显示可供单一或多个选择的列表项，给列表框添加列表项既可以在设计阶段通过其List属性设置加入(注意每输入完一项后按"Ctrl+Enter"组合键换行再输入下一项)，也可在程序运行时通过代码"列表框名.AddItem"项目""加入，清除窗体内容可通过Cls方法来实现。

　　根据题意，新建"标准EXE"工程，将一个List控件添加到窗体中，其名称为List1，在属性窗口的list属性中添加"Item1"、"Item2"和"Item3"，每输入一个后按"Ctrl+Enter"组合键换行输入下一个元素，当输入完成后，按回车键，则元素添加完成，双击Form1的空白处，进入代码编写窗口，编写如下代码：

　　Private Sub Form_DblClick()

　　Dim i As Integer

　　For i = List1.ListCount - 1 To 0 Step -1 '先删除索引大的项，防止i溢出

　　List1.RemoveItem i '移除索引指定项

　　Next i

　　End Sub

　　单击

　　按钮运行程序，并按要求保存。

　　(2)命令按钮(CommandButton)常用来建立实现某种命令，通过命令按钮的Caption属性设置其标题;控件是否有效由其Enabled属性来设置，值为True表示有效，值为False表示无效;单击命令按钮将触发其Click事件。

　　要实现程序运行时单击某个按钮使文本框变为无效，只需编写该按钮的Click事件过程中修改文本框的Enabled属性值即可。

　　根据题意，新建"标准EXE"工程，将一个文本框控件和两个命令按钮添加到窗体中，文本框的名称为Text1，命令按钮的名称分别为Command1和Command2，Caption属性分别为"启用"和"禁用"。双击Command1进入代码窗口，编写如下代码：

　　Private Sub Command1_Click()

　　Text1.Enabled = True '启用Text1

　　End Sub

　　Private Sub Command2_Click()

　　Text1.Enabled = False '禁用Text1

　　End Sub

　　单击

　　按钮运行程序，并按要求保存。

　　相关推荐：

　　2014年全国计算机二级VB上机考试试题汇总

　　考试吧考后首发2014年3月计算机等考真题及答案通知

　　考试吧推荐：2014年3月计算机二级考前冲刺备考专题