Memory Drive

반응형
  1. Private Sub Text1_KeyPress(KeyAscii As Integer)
  2. ' 대문자로만 입력받음
  3.     KeyAscii = Asc(UCase(Chr(KeyAscii)))
  4. End Sub
 
반응형