Re: [VB6 ] 限定text中只能輸入數字和刪除鍵

看板Visual_Basic作者JingTeng (愛恨惹是非)時間18年前 (2007/04/09 22:21)推噓2(2推 0噓 0→)

留言2則, 1人參與討論串2/2 (看更多)

※ 引述《slycsboy (喵~~被二一了)》之銘言： : Private Sub Text4_Keypress(Keyascii As Integer) : If Keyascii < Asc("BS") Or Keyascii > Asc("BS") Or Keyascii < Asc("0") Or Keyascii > Asc("9") Then ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 直接改成不等於即可後面那段互相矛盾所以不管Key什麼都會成立 : Keyascii = 0 : Beep : End If : End Sub : ----------- : 請問我這樣為什麼不能動作= = : 有哪邊出問題嗎 : 謝謝了 Asc("BS") = 66 <-- 因為只會抓第一個來轉,所以不能用 Backspace 十進位為 8 所以判斷式要改成 If KeyAscii <> 8 And (KeyAscii < Asc("0") Or KeyAscii > Asc("9")) -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.57.100.245

推

fumizuki

04/11 21:32, , 1^F

04/11 21:32, 1^F

推

fumizuki

04/11 21:33, , 2^F

04/11 21:33, 2^F

‣ 返回看板[ Visual_Basic ] 程設

‣ 更多 JingTeng 的文章

文章代碼(AID): #166alq94 (Visual_Basic)