Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: nur zahlen eingeben
Autor: unbekannt
Datum: 30.01.02 18:14
Hi outcast, in diesem Fall mache ich es immer so: Private Sub Text1_KeyPress( KeyAscii As Integer) Dim A As String Dim F As Integer A="ABCDEFGHIJKLMNOPQRSTUVWZYX ÖÄÜ <> /" f = Instr(A,Ucase(Chr(KeyAscii)) If f = 0 Then MsgBox "Sie haben ein unerlaubtes Zeichen eingegeben.",vbExclamation,"DAU-INFO" KeyAscii = 0 End If End SubWir haben somit erlaubt: Buchstaben von aA - üÜ, das Leerzeichen, das <-Zeichen, das > Zeichen, einen Slash und einen Backslash. Wenn wir noch was erlauben wollen, fügen wir es einfach dem A - String hinzu - ohne viel Firlefanz. cu Lordchen

nur zahlen eingeben	49	outcast3112	30.01.02 17:52
Re: nur zahlen eingeben	207	unbekannt	30.01.02 17:58
Re: nur zahlen eingeben	35	outcast3112	30.01.02 18:00
Re: nur zahlen eingeben	207	unbekannt	30.01.02 18:14

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