[SOLUCIONADO] consulta select para un label

[franco55]

Amigos tengo este codigo para poner la matricula de un medico traido de una bd de mysql en un textbox pero nose como es la sentencia hasta aqui anda bien...
sql = "select matricula from doctor where apellidomed like'" & .Label4.Caption
&"%'"

Aqui la sentencia.....................

Private Sub Command2_Click()
nuetur.show
' verifica que hay datos en el ListView y que hay uno seleccionado
If (ListView1.ListItems.Count = 0) Then
MsgBox "No hay ningún regisro para editar", vbInformation
Exit Sub
End If
If (ListView1.SelectedItem Is Nothing) Then
MsgBox "Debe seleccionar previamente un registro para poder editarlo", vbInformation
Exit Sub
End If
With nuetur
' obtiene el elemento seleccionado
.Label3.Caption = ListView1.SelectedItem.Text
.Label4.Caption = ListView1.SelectedItem.ListSubItems(2).Text

'Dim matricula As String
.Label4.Caption = ListView1.SelectedItem.ListSubItems(2).Text
Set rs = New ADODB.Recordset
sql = "select matricula from doctor where apellidomed like'" & .Label4.Caption & "%'"
MsgBox (sql)
cn.Execute sql
'matricula = sql
.Label6.Caption = sql

End With

[Malenko]

No he entendido bien la duda. Veo que la "select" está bien construida y haces un Execute pero no capturas el resultado. Es quizás este el punto que te falta? Si es así, tendrías que darle un vistazo al ExecuteReader para lanzar la ejecución de un código SQL del que esperas leer una respuesta.

[franco55]

exactamente no esta obteniendo el resultado....en sql la consulta si funciona pero al ponerlo en visual basic hay q hacer otra cosa y noce q hacer

[Malenko]

Iniciado por franco55

exactamente no esta obteniendo el resultado....en sql la consulta si funciona pero al ponerlo en visual basic hay q hacer otra cosa y noce q hacer

El problema es que la consulta se lanza y se ejecuta correctamente, pero para obtener el resultado has de usar el ExecuteReader que te comenté en mi anterior respuesta. Revisa el link que te puse y prueba a ver que tal :)