我有2个列表框并使用按钮删除列表框中的每个项目。使用第一个列表框的索引删除第二个列表框。问题是当没有选择项目时会发生错误。
If ListBox1.SelectedItem = -1 Then
Exit Sub
Else
ListBox2.Items.RemoveAt(ListBox1.SelectedIndex)
ListBox1.Items.Remove(ListBox1.SelectedItem)
Calculate()
End If
如果所选项目为-1(未选择任何项目),它应该停止。停止操作。
答案 0 :(得分:0)
如果未选择任何项目,那么您正在测试的SelectedItem
将为Nothing
。 SelectedIndex
为-1。
此外,如果您只想在一个案例中执行某些操作,请不要使用If...Else
。只是颠倒条件:
If ListBox1.SelectedIndex <> -1 Then
ListBox2.Items.RemoveAt(ListBox1.SelectedIndex)
ListBox1.Items.Remove(ListBox1.SelectedItem)
Calculate()
End If