Duda con datareports y consulta

[Shizuka]

Hola! de antemano pido una disculpa por que acabo de hacer un post de un tema algo diferente, pero espero que no les moleste, trato siempre dejar de pasar días antes de volver a empezar un tema, pero esta vez tengo una duda importante y se trata de lo siguiente:

Quiero realizar un reporte en Vb 6 con data reports, encontré un tutorial pero es con Access, así que estoy tratando de guiarme ya que yo uso MySQL :C el problema es que tengo que hacer una consulta en esta parte:



Pero el problema es que la consulta que hago en el formulario para buscar el registro que quiero que se imprima es por medio de este código:

Adodc1.Recordset.MoveFirst
dato = InputBox("INGRESE LA MATRÍCULA A BUSCAR :", "BUSQUEDA")

If dato = "" Then Exit Sub

Adodc1.Recordset.Find ("matricula=" + "'" + dato + "'")
If Adodc1.Recordset.EOF Then
MsgBox "LA MATRÍCULA QUE INGRESO NO EXISTE, POR FAVOR INTENTELO DE NUEVO", 64, "AVISO"
Adodc1.Recordset.MoveFirst
Exit Sub
End If


Es decir que en si no tengo ninguna consulta, si no que se usa el método find, y el problema es que no se bien como pasar eso a una consulta sql server como esta :

SELECT * FROM expediente WHERE matricula=dato

está bien así? O.o
Muchas gracias de antemano por la ayuda *3*