AYUDA POR FAVOR.Solo expertos en vb 6.0 ME HARIAS UN FAVOR MUY GRANDE.GRACIASS!!!

jorge
09 de Febrero del 2004
public b,i,c as integer
Private Sub DataCombo1_Click(Area As Integer)
b = Me.DataGrid1.ApproxCount
i = Me.DataGrid1.Bookmark
for c=i+1 to b
idlinea = Adodc3.Recordset.Fields("Idlinea").Value
idlinea = idlinea - 1
Me.Adodc3.Recordset.Fields("Idlinea") = idlinea
Adodc3.Recordset.MoveNext
Next c

ME HAN DIXO KE TGO KE UTILIZAR EL EVENTO AFTER DELETE PORQUE ACIENDO ESTO NO ME DEJA REDIMENSIONAR EL IDENTIFICADOR DE LINEA ME DICE KE ESTOY INTENTADO ELIMINAR UN REGISTRO KE YA ESTA SELECIONADO PARA ELIMINAR O KE YA ESTA ELIMINADO.
PORFAVOR ALGUIEN ME PUEDE AYUDAR.GRACIAAASSS!!!