關(guān)鍵字查詢問題

slyz974

關(guān)于文件搜索，為什么我點(diǎn)查詢沒有反應(yīng)�。�
ActiveX控件
OLE類：ListViewCtrl
類：MSComctlLib.ListViewCtrl.2
名稱：ListView

我做了一個(gè)文本框，名稱：文件名 和查詢按鈕
Private Sub 查詢_Click()
Dim i As Long
If Nz(Me.文件名.Value, "") = "" Then Exit Sub
For i = 1 To Me.ListView.ListCount - 1
    Me.ListView.Selected(i) = True
    If InStr(Me.ListView.Column(0, i), Me.文件名.Value) = 0 Then
        Me.ListView.Selected(i) = False
    End If
Next
End Sub

方漠

麻煩上傳你的文件上來.