hi,guys
i made a user form to search for specific data by entering a value in a textbox in the userform then results will be shown on a list box using this code
and it work,but my problem is when i search by 1 the results shown for inv # 1(which i searched for) and also 10 , 11 and any other inv begins with 1
so, i need when i search by typing 1 then get the results of 1 only . hope to help me ,thanx in advance

Private Sub TextBox1_Change()
On Error Resume Next
Label1.Visible = True
Label2.Visible = True
Label3.Visible = True
Label4.Visible = True
Label5.Visible = True
Label6.Visible = True
ListBox1.Visible = True
'=======================================
'=======================================
Dim ws As Worksheet
Dim V As Integer
Dim LastRow As Integer
Dim M As Integer
Dim Q, F
ListBox1.Clear
If TextBox1.Text = "" Then GoTo 1
M = TextBox1.Value
Set ws = Sheets("ÔÑÇãæÇÏ")
With ws
LastRow = .Cells(.Rows.Count, "c").End(xlUp).Row
Set Q = .Range("c12:c" & LastRow).Find(M)

If Not Q Is Nothing Then
F = Q.Address
Do
If Application.WorksheetFunction.search(M, Q, 0) = 0 Then
ListBox1.AddItem Q.Value
ListBox1.List(V, 0) = Q.Offset(0, 1).Value
ListBox1.List(V, 1) = Q.Offset(0, 2).Value
ListBox1.List(V, 2) = Q.Offset(0, 3).Value
ListBox1.List(V, 3) = Q.Offset(0, 4).Value
V = V + 1
End If
Set Q = .Range("c12:c" & LastRow).FindNext(Q)
Loop While Not Q Is Nothing And Q.Address <> F
End If
End With
1 End Sub