VB入门教程：[20]使用菜单

在本课中，您将学习如何在列表中添加项以及从列表中删除项。您还将学习如何在用户选择列釉涑杵抑表中的项时执行操作。如果希望为用户提供一个选项列表，可以在 ListBox 控件或 ComboBox 控件中显示项的列表。

工具/原料

电脑一台

VB2008

了解ListBox和ComboBox控件

1、ListBox 控件可让您同时指定多个项，并使用户能够浏览较长的列表。当用户选择一个项时，该项会在列表中突出显示，如下图所示：

试一试【向列表框中添加项】

1、新建一个项目。将“ListBox”控件添加到窗体中，保留默认名称“ListBox1”。

当选定项发生更改时执行操作

1、将“TextBox”控件添加到窗体中，保留默认名称“TextBox1”。

3、运行程序。当窗体打开时，单击列表框中的某个项以查看文本框中显示的选定颜色。关闭程序。

2、右键单击窗体并单击“查看代码”，打开代码编辑器。在代码编辑器中的“类名”下拉列表中，单击“ListBox1”。在“方法名白镢梧螂称”下拉列表中，单击“DoubleClick”以创建事件处理程序。向 ListBox1_DoubleClick 事件处理程序中添加下列代码以向组合框添加项。由于可以存在空的列表框，因此在添加选定项之前，应确保此选定项不为空。If ListBox1.SelectedItem IsNot Nothing Then If Not ComboBox1.Items.Contains(Me.ListBox1.SelectedItem) Then Me.ComboBox1.Items.Add(Me.ListBox1.SelectedItem) End If Me.ComboBox1.SelectedItem = Me.ListBox1.SelectedItemEnd If

从列表框中删除项

1、将下面的代码添加到 ListBox_DoubleClick 事件处理程序中的 苇质缵爨End If 语句上方。Me.ListBox1.Items.R髫潋啜缅emove(Me.ListBox1.SelectedItem)

2、运行程序。双击列表框中的项并确认是否将这些项从列表框中删除并添加到组合框。

3、在本课中，我们学习了如何向列表中添加项以及从列表中删除项。我们还学习了如何在用户选择项时执行操作。在下一课中，我们将学习如何使用显示日期和时间的控件。