PDA

View Full Version : معرفی کردن یکی از کلید های صفحه کلید



maryamb
سه شنبه 21 خرداد 1387, 17:56 عصر
شاید عنوان رو خیلی بد انتخاب کرده باشم ، میخواستم بدونم چطوری میتونم مثلا کلید backspace رو تو برنامم بشناسونم.
بذارید بهتر بگم فرضا یه تکست باکس دارم میخوام بگم فقط عدد و بک اسپیس رو قبول کنه ، عدد رو خودم می دونم چطوری وارد کنم ولی بک اسپیس رو چجوری معرفی کنم ؟

barnamejoo
سه شنبه 21 خرداد 1387, 18:00 عصر
یعنی backspace رو بفرستی به تکست باکس؟


Text1.setfocus
SendKeys "{BS}"

maryamb
سه شنبه 21 خرداد 1387, 18:15 عصر
نه میخوام تکست باکس رو فیلتر کنم که فقط عدد و ممیز و بک اسپیس رو قبول کنه.
نمی دونم بک اسپیس رو چجوری بهش بشناسونم.

barnamejoo
سه شنبه 21 خرداد 1387, 18:20 عصر
نه میخوام تکست باکس رو فیلتر کنم که فقط عدد و ممیز و بک اسپیس رو قبول کنه.
نمی دونم بک اسپیس رو چجوری بهش بشناسونم.
اها! کد اسکیش 8 ه:



Private Sub Text1_KeyPress(KeyAscii As Integer)
If (KeyAscii < Asc("0") Or KeyAscii > Asc("9")) And KeyAscii <> 8 Then
KeyAscii = 0
End If
End Sub