Visual Basic - MSGBOX EN BUSQUEDAS.

Hola, tengo una base de datos con un apartado (text y command) para realizar búsquedas donde text7 es donde pongo el texto a buscar, Command7 el botón para comenzar a buscar. La cuestión es que incluyo abajo, despues de que busque en os distintos campos, incluyo un código para que en el caso de que no encuentre ningun registro, aparezca el msgbox "NO", pues bien, si no encuentra el dato, aparece el mensaje, pero si encuentra el dato tambien aparece el mensaje, logicamente solo debe aparecer cuando no encuentra el dato ¿que falla? el código es el siguiente:

Private Sub Command17_Click()

' Se coloca en el primer registro para realizar la búsqueda.
Data1.Recordset.MoveFirst
' Buscar la primera coincidencia en el recordset del Data1en el campo nombre.
Data1.Recordset.FindNext "nombre Like '" & Text7.Text & "'"
' Lo mismo.
Data1.Recordset.FindNext "apellidos Like '" & Text7.Text & "'"
' Lo mismo.
Data1.Recordset.FindNext "dni Like '" & Text7.Text & "'"
' Lo mismo.
Data1.Recordset.FindNext "coche Like '" & Text7.Text & "'"
' Lo mismo.
Data1.Recordset.FindNext "matricula Like '" & Text7.Text & "'"

If Data1.Recordset.NoMatch Then
MsgBox "NO"
End If

End Sub

y no te te ocurrio poner primero FindFirst?

donde? soy un poco torpe

Lo tenes que antes del nomach , el Findfirst es un metodo de busqueda .Busca hasta el primero de la lista. Si tenes varias campos que buscar vas a tener que poner varios Findfirst porque va a buscar el criterio quele pongas en tu caso es text7
saludos