Проверьте, существует ли элемент в listbox1 - PullRequest
1 голос
/ 02 марта 2012

В форме 1 у меня есть два списка: listbox1, listbox2; кнопка загрузки и сохранения

Этот код запишет listbox1.selecteditem в текстовый файл, и кнопка загрузки загрузит информацию.

Но в listbox2 я хочу, чтобы кнопка загрузки проверила, существует ли этот элемент в listbox2, если не записать выбранный элемент из listbox1, и если этот элемент уже существует в listbox2, не сохраняйте его (сообщение «этот элемент уже существует в listbox2»)

Это не работает

Dim wri As New IO.StreamWriter("e:\test.txt", True)
If ListBox2.ToString.Contains(ListBox1.Items.Item) Then ' or ListBox1.SelectedItem ? ' not work 
    MsgBox("this item is already in listbox2")
Else
    wri.WriteLine(ListBox1.SelectedItem, True)
End If
wri.Close()

1 Ответ

2 голосов
/ 02 марта 2012

Измените свой код на следующее:

If ListBox2.Items.Contains(ListBox1.Items.Item) Then ' or ListBox1.SelectedItem ? ' not work 

    MsgBox("this item is already in listbox2")
Else

    wri.WriteLine(ListBox1.SelectedItem, True)

End If

wri.Close()
...