清除 Visual Basic （Windows 应用程序） 中组合框的项

Question

我写了这段代码来清除组合框中的项目

但我面临的问题是，当我从组合框1中选择“a”时，组合框2会显示“1”、“2”和“3”，假设我从组合框2中选择“1”，然后当我将组合框1的值更改为“b”时，组合框2的下拉菜单中会显示“4”、“5”和“6”，但组合框2中的选定值仍为“1”

If ComboBox1.text="a" then
ComboBox2.items.clear()
ComboBox2.items.add("1")
ComboBox2.items.add("2")
ComboBox2.items.add("3")
ElseIf ComboBox1.text="b" then
ComboBox2.items.clear()
ComboBox2.items.add("4")
ComboBox2.items.add("5")
ComboBox2.items.add("6")
ElseIf ComboBox1.text="c" then
ComboBox2.items.clear()
ComboBox2.items.add("7")
ComboBox2.items.add("8")
ComboBox2.items.add("9")
Else
ComboBox2.items.clear()
End if

Answer 1

我认为您要做的是更改框中的内容，因此选择旧的选定项目不再有任何意义。正如一些评论所建议的，您仍然选择了剩余索引。您需要将索引重置（为-1），以便没有选择任何内容。

这应该可以解决问题，方法是在每次清除/重新填充框内容时清除所选索引（未选择任何项目）。

If ComboBox1.text="a" then
    ComboBox2.items.clear()
    ComboBox2.SelectedIndex = -1
    ComboBox2.items.add("1")
    ComboBox2.items.add("2")
    ComboBox2.items.add("3")
ElseIf ComboBox1.text="b" then
    ComboBox2.items.clear()
    ComboBox2.SelectedIndex = -1
    ComboBox2.items.add("4")
    ComboBox2.items.add("5")
    ComboBox2.items.add("6")
ElseIf ComboBox1.text="c" then
    ComboBox2.items.clear()
    ComboBox2.SelectedIndex = -1
    ComboBox2.items.add("7")
    ComboBox2.items.add("8")
    ComboBox2.items.add("9")
Else
    ComboBox2.items.clear()
    ComboBox2.SelectedIndex = -1
End If