Visual Basic - Para TecniCam y Felipe-Tema DBGrid

Life is soft - evento anual de software empresarial
 
Vista:

Para TecniCam y Felipe-Tema DBGrid

Publicado por Grisel (1 intervención) el 29/09/2000 00:00:00
En primer lugar quiero agradecerles su valiosa ayuda y, a la vez, les comento que luego de pasar la mañana investigando solucioné el problema de la siguiente forma, creo que debe ser otra alternativa para llegar al mismo resultado. El primer ejemplo utiliza un dbgrid enlazado y el segundo, uno en modo unbound, ahí va y espero que también a uds. les sirva. Saludos desde Argentina.

Private Sub cmdborrar_Click()
DBGrid1.SelBookmarks.Add DBGrid1.RowBookmark(DBGrid1.Row)
Data1.Recordset.Delete
Data1.Refresh
DBGrid1.Refresh


Private Sub cmdborrar_Click()
DBGrid1.SelBookmarks.Add DBGrid1.RowBookmark(DBGrid1.Row)
Dim iRow As Integer
iRow = DBGrid1.RowBookmark(DBGrid1.Row)
vector1(0, iRow) = " "
vector1(1, iRow) = " "
vector1(2, iRow) = 0
.
.
.
vector1(n, iRow) = 0
mTotalRows = mTotalRows - 1

DBGrid1Refresh
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Para TecniCam y Felipe-Tema DBGrid

Publicado por tecniCam (220 intervenciones) el 01/10/2000 00:00:00
LEIDO... Y GRACIAS POR COMPARTIR.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar