DBGrid Error al Cerrar el Formulario desde Evento
Publicado por julio (48 intervenciones) el 19/01/2006 19:28:09
Cuando salgo desde el evento keypress, sale en forma brusca y directa al sistema operativo.
Private Sub dbgPlan_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
'Agregue esas lineas creyendo podria solucionarlo, pero no
' Set dbgPlan.DataSource = Nothing ' Funciona
'Adodc1.Recordset.Close ' funciona
Unload Me ME CAUSA EL ERROR fatal que les comente
End If
End Sub
El usuario en un campo del formulario tiene que ingresar un codigo, por ejemplo de producto, y ese codigo lo tiene que validar que este en la tabla productos. En caso que no encuentra el codigo, abre un formulario con el DBGrid, entonces el usuario elige el codigo y lo recupera.
Yo queria que cuando el usuario seleccione el codigo y presione Enter sobre la grilla, cierre el formulario (seria lo ideal).
Pero lamentablemente cuando cierro el formulario dentro del evento KeyPress se produce el error.
Si pongo el foco fuera de la grilla, no tiene problema.
¿Cómo di una solucion alternativa?
Puse un boton de comando Cancelar y ahi le mando un SendKeys (Tab), le pasa el foco al boton y vuelvo a presionar Enter y dentro del Evento Cancelar cierro el formulario sin ningun problema.
Me gustaria evitar el doble Enter.
¿Alquien sabe por qué el error? Alguna codificación alternativa?
desde ya muchisimas gracias
Private Sub dbgPlan_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
'Agregue esas lineas creyendo podria solucionarlo, pero no
' Set dbgPlan.DataSource = Nothing ' Funciona
'Adodc1.Recordset.Close ' funciona
Unload Me ME CAUSA EL ERROR fatal que les comente
End If
End Sub
El usuario en un campo del formulario tiene que ingresar un codigo, por ejemplo de producto, y ese codigo lo tiene que validar que este en la tabla productos. En caso que no encuentra el codigo, abre un formulario con el DBGrid, entonces el usuario elige el codigo y lo recupera.
Yo queria que cuando el usuario seleccione el codigo y presione Enter sobre la grilla, cierre el formulario (seria lo ideal).
Pero lamentablemente cuando cierro el formulario dentro del evento KeyPress se produce el error.
Si pongo el foco fuera de la grilla, no tiene problema.
¿Cómo di una solucion alternativa?
Puse un boton de comando Cancelar y ahi le mando un SendKeys (Tab), le pasa el foco al boton y vuelvo a presionar Enter y dentro del Evento Cancelar cierro el formulario sin ningun problema.
Me gustaria evitar el doble Enter.
¿Alquien sabe por qué el error? Alguna codificación alternativa?
desde ya muchisimas gracias
Valora esta pregunta
0