Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Sonderzeichen _Textbox
Autor: Kobe
Datum: 28.10.13 10:11
Hallo, vlt. kann mir jmd. weiterhelfen. Ich hab hier diesen Code: Private Sub txtShortname_BeforeUpdate(Cancel As Integer) If IsNull(Me.IDTXSContract) Then Cancel = False Exit Sub End If If DCount("*", "tblTXSContract", "txtShortName = '" & Me.txtShortname & "'") = 1 Then MsgBox ("Please select unique name for contract short name.") Cancel = True Else Cancel = False End If Dim strVorgabe As String strVorgabe = "1234567890abcdefghijklmnopqrstuvwxyz" If InStr(1, strVorgabe, Chr(KeyAscii)) > 0 Then MsgBox ("Wrong input!") Select Case KeyAscii Case 8 End Select KeyAscii = 0 End If End Sub Ich würde gerne Sonderzeichen verbieten. Jedoch beim ausführen kommt keine Fehlermeldung. Danke im Voraus.

Sonderzeichen _Textbox	1.162	Kobe	28.10.13 10:11
Re: Sonderzeichen _Textbox	585	effeff	28.10.13 13:50

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen