dim foo as string = "hello"
检查 foo 是否在 listbox1 中?
if listbox1.items.contains(foo) then
不工作
Dim foo As String
foo = "Hello"
For i As Integer = 0 To ListBox1.Items.Count - 1
If ListBox1.Items(i).ToString = foo Then
MsgBox(i)
End If
Next
i 是在列表框中找到该项目的索引。
如果它不起作用,那么“hello”不是列表框项目集合中的项目。请记住,“hello”、“hello”、“Hello”和“hello”都是不同的字符串。此外 .Contains 只会比较整个项目,它不会在单个项目中找到子字符串。如果这是您想要的,您将需要一个自定义子例程。
你好,可以试试
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim found As String = ""
Dim foo As String
foo = "hello"
For i As Integer = 0 To ListBox1.Items.Count - 1
If ListBox1.Items(i).ToString = foo Then
found = (i)
End If
Next
If found = "" Then
MessageBox.Show("not found your word!!")
Else
MessageBox.Show("found hello, word!")
End If
End Sub