根据VB.net中的组合框更改istbox的值

Question

我有一个组合框和一个列表框。 当用户从组合框中选择一个项目时，列表框将显示某些数据。 然后，当用户从组合框切换项目时，列表框将显示另一组数据。

但是，当我将组合框的值从“监视器”更改为“鼠标”时，列表框中的数据将继续并且不会更改。

这是我的代码。 提前致谢。

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

        If ComboBox1.Text = "Monitor" Then
            ListBox1.Items.Add("Monitor 1")
            ListBox1.Items.Add("Monitor 2")
            ListBox1.Items.Add("Monitor 3")
        End If
        If ComboBox1.Text = "Mouse" Then
            ListBox1.Items.Add("Mouse 1")
            ListBox1.Items.Add("Mouse 2")
            ListBox1.Items.Add("Mouse 3")

        End If

Answer 1

在分配下一个值之前，请清除列表框。

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

    ListBox1.Items.Clear()

    If ComboBox1.Text = "Monitor" Then ......

Answer 2

您需要使用VALUE。 设置组合框时，将具有“文本”和一个值。

私有子ComboBox1_SelectedIndexChanged（发送方为对象，e作为EventArgs）处理ComboBox1.SelectedIndexChanged

    ListBox1.Items.Clear()
    If ComboBox1.value = "Monitor" Then
        ListBox1.Items.Add("Monitor 1")
        ListBox1.Items.Add("Monitor 2")
        ListBox1.Items.Add("Monitor 3")
    End If

    If ComboBox1.value = "Mouse" Then
        ListBox1.Items.Add("Mouse 1")
        ListBox1.Items.Add("Mouse 2")
        ListBox1.Items.Add("Mouse 3")

    End If