Borrar grilla con KeyBack
Hola David!
Quisiera saber como borrar una celda de una grilla MsFlexgrid. Funciona con VbKeyDelete pero cuando presiono vbKeyBack, me aparece como que es un carácter no permitido (según mi validación) y no me borra nada, tendría que borrar el ultimo carácter.
Utilizo el siguiente código:
Private Sub MSFFacturas_KeyUp (KeyCode as integer, Shift as integer)
Select Case Key Code
Case vbKeyDelete
form14.MSFFacturas.=""
Case vbKeyBack
If Len(Form14.MSFFacturas.Text) > 0 then
form14.MSSFacturas.Text =Left (Form14.MSFFacturas.Text, Len (Form14.MSFFacturas.Text)-1)
end if
End Select
Gracias, saludos
Griselda
Quisiera saber como borrar una celda de una grilla MsFlexgrid. Funciona con VbKeyDelete pero cuando presiono vbKeyBack, me aparece como que es un carácter no permitido (según mi validación) y no me borra nada, tendría que borrar el ultimo carácter.
Utilizo el siguiente código:
Private Sub MSFFacturas_KeyUp (KeyCode as integer, Shift as integer)
Select Case Key Code
Case vbKeyDelete
form14.MSFFacturas.=""
Case vbKeyBack
If Len(Form14.MSFFacturas.Text) > 0 then
form14.MSSFacturas.Text =Left (Form14.MSFFacturas.Text, Len (Form14.MSFFacturas.Text)-1)
end if
End Select
Gracias, saludos
Griselda
1 respuesta
Respuesta de denciso
1
Sugiero que no lo valides y veas como te va, ya que debe de ser sin programar nada el uso del vbKeyBack.
