Jobs
Author: gajesh kumar bagri Date Submitted: 8/30/2007 Category: Other Compatibility: VB 6 This code has been accessed 1863 times.
Email Yourself this snippet:
No declaration
Code
private sub text1_keypress(keyAscii as integer) KeyAscii=Asc(Ucase(Chr(KeyAscii))) End sub