title image


Smiley Re: Inside
Jo.. nu ist alles klar...probier das mal :Private Sub Text1_KeyPress(KeyAscii As Integer)'Buchstaben zwischen a und z If KeyAscii > 96 And KeyAscii KeyAscii = KeyAscii - 32 End If'umlaute (ö,a,ü) If KeyAscii = 246 Or KeyAscii = 228 Or KeyAscii = 252 Then KeyAscii = KeyAscii - 32 End IfEnd Subsollte funzen.. tut es zumindestens bei mir ;)

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: