Crear un Boton De Busqueda Con Una BD Mysql

[CiberRed]

Hola a todos, tengo un problema eh creado una aplicacion en vb 6 la cual se conecta a una BD en Mysql todo me va muy bien el problema es en la creacion del boton BUSQUEDA ya q no eh logrado hacerlo espero puedan ayudarme en la realizacion de este aca les dejo una parte del codigo de del formulario de clientes q tengo mi idea es hacer un TextBox con un boton de busqueda, el cual funcionara que al ingresar el id del cliente en el TextBox me muestre los datos del cliente, espero puedn ayudarme:

Código:

Dim Conn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
    Conn.Open "driver={mysql odbc 3.51 driver};" _
                                       & "user=root;" _
                                       & "password=;" _
                                       & "server=localhost;" _
                                       & "database=midb;"
         
    rs.Open "select * from clientes", Conn, adOpenStatic, adLockOptimistic
         
    Text1.Text = rs.Fields("idcliente")
    Text2.Text = rs.Fields("nombre")
    Text3.Text = rs.Fields("apellidopaterno")
    Text4.Text = rs.Fields("apellidomaterno")
    Text5.Text = rs.Fields("direccion")
    Text6.Text = rs.Fields("ciudad")
    Text7.Text = rs.Fields("estado")
    Text8.Text = rs.Fields("nota")
    
End Sub

Espero puedan asesorarme con este problema y muchas gracias por todo.