问题
问答题
在窗体上拖拉出一个文本框，名称为Txt1，Text属性为空白。再画一个列表框，名称为Lst1，通过属性窗口向列表框中添加4个项目，分别为“aaaa”、“bbbb”、“cccc”和“dddd”(如下图所示)。编写适当的事件过程，使程序运行后，在文本框中输入一个字符串，如果双击列表框中的任一项，则把文本框中的字符串添加到列表框中。
程序运行时的窗体界面如下图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
答案
参考答案：
第一步：建立工程和添加窗体。
单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。启动Visual Basic后，在“新建工程”对话框中选择“新建”项目中的“标准EXE”，然后单击“打开”按钮，建立一个新的工程文件，里面会同时自动建立一个名为Form1的窗体文件。
第二步：设计窗体。
单击工具箱中的ListBox控件图标，然后在窗体上拖拉出一个列表框，通过属性窗口设计其Name属性为Lst1，通过设置List属性为列表框添加“aaaa”、“bbbb”、“cccc”和“dddd”四个列表项．按Ctrl+Enter组合键换行。单击工具箱中的TextBox控件图标，然后在窗体上拖拉出一个文本框，通过属性窗口设置其Name属性为Txt1，Text属性为空。
第三步：编写代码：
在弹出的代码窗口中，输入如下程序语句：
1 Private Sub Lst1_DblCliek( )
2 Lst1.AddItem Txt1.Text
3 End Sub
第四步：保存。
解析：
本题主要考查列表框的AddItem方法，用来在列表框中插入一行文本。另外，注意本题的触发事件是DblClick，而不是Click。