现在在 ListView 增加了几千条记录,我想找这几千条里某一条记录,我在窗体上放了一个 TextBox(Txt_Input),我想在Txt_Input 里输入一个或多个字符时,如果在ListView 里有和这个字符匹配的话,就将这个记录选中,我知道在ListBox 里可以实现,但在 ListView 里如何实现呢?我找了半天没有找那个参数。望高手指点!!Private Sub Txt_Input_Change()
Debug.Print SendMessage(Lsv_Info.hwnd, "这里的值应该是多少?", -1, _
ByVal CStr(Txt_Input.Text))
End Sub
Debug.Print SendMessage(Lsv_Info.hwnd, "这里的值应该是多少?", -1, _
ByVal CStr(Txt_Input.Text))
End Sub
Private Const LB_FINDSTRINGEXACT = &H1A2
LISTVIEW好像不是这个~~
On Error GoTo Errhandle
ListView1.ListItems(ListView1.FindItem(Text1.Text).Index).Selected = True
ListView1.SetFocus Exit Sub
Errhandle:
If Err.Number = 91 Then
MsgBox "对不起,没有找到!", vbInformation
Else
MsgBox Err.Description, vbExclamation
End If
End Sub
方法我已经写出来了,看看吧~~