Как сделать вывод только  заглавных букв в TextBox

Автор: Кулишов Андрей

Независимо от того вводить в Text1 заглавные или прописные буквы все они становится
заглавными.

Private Sub Text1_KeyPress(KeyAscii As Integer)

Dim char
char = Chr(KeyAscii)
KeyAscii = Asc(UCase(char))

End Sub

 

 

 

 

 

 

 

                                                                   ОБСУДИТЬ СТАТЬЮ НА ФОРУМЕ