PDA

View Full Version : caps lock


karmand
چهارشنبه 16 اسفند 1385, 07:03 صبح
روی پاکات کارت سوخت بارکدی است که وقتی وارد کامپیوتر میشود حروف درشت وارد میشود و این امردر زمان جستجو مشکل ساز است و مجبوریم مرتبا کلید caps lock را خاموش و روشن کنیم
ایا میشود در زمان جستجو وقتی به textbox مورد نظر رسید حروف درشت بگیر و زمان خروج از text دوباره حروف ریز بگیرد
MM_Mofidi
چهارشنبه 16 اسفند 1385, 10:26 صبح
در رویداد keydown یا keyupیا keypress میتونید دستی تبدیل کنید. یا از mask استفاده کنید
karmand
چهارشنبه 16 اسفند 1385, 12:40 عصر
جناب مفیدی با عرض معذرت لطفا کد را نیز بنویسید !!!
karmand
چهارشنبه 16 اسفند 1385, 13:08 عصر
کد را از HELP پیدا کردم متشکرم
Private Sub Text2_KeyPress(KeyAscii As Integer)
Dim strCharacter As String

' Convert ANSI value to character string.
strCharacter = Chr(KeyAscii)
' Convert character to upper case, then to ANSI value.
KeyAscii = Asc(UCase(strCharacter))
End Sub