Taste sperren
30.03.2009 20:05:35
Frank
Mittels folgendem Code wird in einer TextBox der Doppelpunkt automatisch gesetzt.
Private Sub TextBox2_Change()
If Len(TextBox2.Text) = 4 Then
TextBox2 = Format(Left(TextBox2, 2) & ":" & Right(TextBox2, 2), "hh:mm")
End If
End Sub
Wenn nun der User oder auch ich versehentlich einen Doppelpunkt eingibt, werden 2 Doppelpunkte in die TextBox geschrieben und der Zweck ist verfehlt!!!
Kann ich die Eingabe eines weiteren Doppelpunktes irgendwie verhindern?
Für Hilfe schon jetzt allerherzlichsten Dank!!!
Gruß Frank H.
Anzeige