title image


Smiley Eingabe prüfen!
Hallo Philipp,



prinzipiell geht das so:Private Sub Command1_Click()

Fl = 0

If Not IsNumeric(Text1.Text) Then

Text1.Text = ""

Fl = 1

End If

If Fl=1 Then MsgBox "Eingabe ungültig"

End SubGruß, Frank



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: