La Web del Programador: Comunidad de Programadores
 
    Pregunta:  14107 - TAMAñO ESCRITURA COLUMNAS DBGRID
Autor:  Francisco González
Estoy haciendo una aplicación en VB6.0 y uso un DBGrid para mostrar los datos de una tabla de Acces, a trvés de un control Data.
Mi problema es que no sé como limitar la escritura en cada celdad del DBGrid al tamaño definido en la tabla Acces, puesto que si escribo más de lo permitido al guardar los datos mediante el evento UPDATE ocurre un error por tamaño de datos mayor que el campo.
Gracias por vuestra colaboración.

  Respuesta:  David Martínez González
Espero que esto te sirva. En este código puedes poner el máximo por columna.

Private Sub DBGrid1_KeyPress(KeyAscii As Integer)

Select Case DBGrid1.Col
Case 0
If Len(DBGrid1) >= 8 Then
KeyAscii = 0 'por poner algo
End If
Case 1
If Len(DBGrid1) >= 3 Then
KeyAscii = 0 'por poner algo
End If
End Select
End Sub