vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Eingabe in Textfeld verhindern 
Autor: Salvatore Russo
Datum: 04.07.03 18:50

Hallo Sina,

ich habe mir für Textfeldeingaben drei Funktionen geschrieben (s.u.)

In deinem Fall würdest Du beim Keypress-Ereignis einfach
folgenden Aufruf machen:

Private Sub txt_stk_KeyPress(KeyAscii As Integer)
    KeyAscii = keypresszahl(KeyAscii)
End Sub
Mit Datums- und Uhrzeiteingaben entsprechend anderer Funktionsaufruf.

Viel Spaß beim ausprobieren

Salvatore

Public Function keypresszahl(taste As Integer) As Integer
    Select Case taste
        Case 48 To 57, vbKeyBack, vbKeyTab
            keypresszahl = taste
        Case Else
            keypresszahl = 0
    End Select
End Function
 
Public Function keypressdatum(taste As Integer) As Integer
    Select Case taste
        Case 48 To 57, vbKeyBack, vbKeyTab
            keypressdatum = taste
        Case 44, 46, 58, 59
            keypressdatum = 46
        Case Else
            keypressdatum = 0
    End Select
End Function
 
Public Function keypressuhrzeit(taste As Integer) As Integer
    Select Case taste
        Case 48 To 57, vbKeyBack, vbKeyTab
            keypressuhrzeit = taste
        Case 44, 46, 58, 59
            keypressuhrzeit = 58
        Case Else
            keypressuhrzeit = 0
    End Select
End Function
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Eingabe in Textfeld verhindern748Sina04.07.03 18:39
Re: Eingabe in Textfeld verhindern494ModeratorDieter04.07.03 18:46
Re: Eingabe in Textfeld verhindern540Salvatore Russo04.07.03 18:50
Re: Eingabe in Textfeld verhindern504Operator05.07.03 01:30

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel