nuevamente !!!!
Como puedo hacer para ingresar un numero en un text y que el data se valla a ese recorset ???
No te entiendo muy bien la pregunta pero prueba a ver si es algo as铆:
El n煤mero lo pones normal en el text y luego en donde lo necesites (un bot贸n, un evento...) pones:
Set NombreRecordset = DB.Openrecordset ("Select * from NombreTabla where NombreCampo = " & Text1.Text & ")"
Espero que te sirva...
El n煤mero lo pones normal en el text y luego en donde lo necesites (un bot贸n, un evento...) pones:
Set NombreRecordset = DB.Openrecordset ("Select * from NombreTabla where NombreCampo = " & Text1.Text & ")"
Espero que te sirva...
La idea es ingresar un numero en un text y que al apretar un boton el recordset del data sea el del numero iungresado.-
Supongamos que en text1 te han escrito el n煤mero de registro que quieren, pues al pinchar en el bot贸n llamado boton....
sub boton_click()
dim i as integer
data1.recordset.movefirst
for i = 0 to data1.recordset.recordcount - 1
if i = cint(text1.text) Then
exit for
end if
data1.recordset.movenext
next i
end sub
salu2
sdemingo
sub boton_click()
dim i as integer
data1.recordset.movefirst
for i = 0 to data1.recordset.recordcount - 1
if i = cint(text1.text) Then
exit for
end if
data1.recordset.movenext
next i
end sub
salu2
sdemingo
