Crear consultas de MySQL en Visual Basic 6

[dahernandezvillegas]

Cordial saludo.

La forma de conectarme a MySQL con Visual Basic, la tome de este foro que es la siguiente y me conecta bien. Ahora lo que necesito es empezar a hacer las consultas.

Public ConexionMySQL As ADODB.Connection
Public RecSQL As ADODB.Recordset

Private Const DRIVER_MYSQL As String = "DRIVER={MySQL ODBC 3.51 Driver};"
Private Const INFO_MYSQL As String = "SERVER=hotelesestelares.no-ip.info;PORT=3306;DATABASE=" & _
"datos;USER=MySQLHotel;PASSWORD= server;"

Sub openconexion()

Set ConexionMySQL = New ADODB.Connection

'conexion a MySql
ConexionMySQL.Open DRIVER_MYSQL & INFO_MYSQL
End Sub

Sub closeconexion()

'cerramos conexion
ConexionMySQL.Close

End Sub