数据保存在txt文本文件中，在文本框中输入单词时，程序会及时地将已输入的字符开头的所有单词显示在列表框中（ListBox中的内容从txt文本文件中得来），供用户浏览；就是这么一个问题，哪个大神来帮下忙，最好有代码。
------解决方案--------------------
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text <> String.Empty Then
getword()
End If
End Sub
Private Sub getword()
ListBox1.Items.Clear()
Using r As IO.StreamReader = New IO.StreamReader("word.txt", System.Text.Encoding.Default)
Dim line As String
line = r.ReadLine
Do While (Not line Is Nothing)
If line.Contains(TextBox1.Text.Trim()) Then
ListBox1.Items.Add(line)
End If
line = r.ReadLine
Loop
r.Dispose()
r.Close()
End Using
End Sub
word.text 测试内容
a
aa
bb
bbb
cc
d
d
e
f
g
g
a
中国
中
中华
中化
中学
人民
人大
人杰地灵
人人
人们