02/11/2005, 10:19
|
 | | | Fecha de Ingreso: abril-2005 Ubicación: R.M. Talagante, Chile!!
Mensajes: 295
Antigüedad: 19 años, 1 mes Puntos: 2 | |
| Haber compadre veo que es un problema común para ambos:
Aqui te va el código, disfrutalo, espero te sirva
Private Sub txtDocenas_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtDocenas.KeyPress
If e.KeyChar.IsDigit(e.KeyChar) Then
e.Handled = False
ElseIf e.KeyChar.IsControl(e.KeyChar) Then
e.Handled = False
ElseIf e.KeyChar = "," And Not txtDocenas.Text.IndexOf(",") Then
e.Handled = True
ElseIf e.KeyChar = "," Then
e.Handled = False
Else
e.Handled = True
End If
End Sub |