[问答题] 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。在名称为Form1，标题为“列表框练习”的窗体上画一个名称为List1的列表框，表项内容依次输入“环球时报”、

[问答题] 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1，标题为“列表框练习”的窗体上画一个名称为List1的列表框，表项内容依次输入“环球时报”、“人物”、“探索”和“读者”；再画2个标题分别为“复制”和“移去”的命令按钮。如图2所示。



要求：编写适当的事件过程，使得单击“复制”按钮，可以将选中的列表项内容复制到已有列表项的尾部；单击“移去”按钮，可以将选中的列表项内容删除。
注意：存盘时，将文件保存至考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。要求程序中不得使用变量，每个事件过程中只能写一条语句。

参考答案：

[操作步骤] 第1步：新建一个标准EXE工程，修改窗体Form1的Caption属性为“列表框练习”。 第2步：在窗体上画一个列表框控件，在其List属性中依次输入“环球时报”、“人物”、“探索”和“读者”，每一项在List属性中占一行。 第3步：在窗体上画两个命令按钮控件，将第一个命令按钮的Caption属性修改为“复制”，将第二个命令按钮的Caption属性修改为“移去”。 第4步：编写程序。 Private Sub Command1_Click() List1.AddItem List1.Text End Sub Private Sub Command2_Click() List1.RemoveItem List1.ListIndex End Sub 第5步：保存并运行工程。

问题解析:

本题考查基本控件列表框和命令按钮的使用。列表框的列表项由它的List属性控制，可以通过属性窗口没置列表项，也可以用程序代码增减列表项。 增加列表项的方法是： 列表框名.AddItem列表项文本, [列表项下标] 省略“列表项下标”则将新表项添加到列表项尾部。 移去列表项的方法是： 列表框名.RemoveItem列表项下。 当前被选中的列表项的文本内容可以从列表框的Text属性获得，当前被选中的列表项的下标可从列表框的ListIndex属性获得。