keyPress事件過程的壹般格式為:
private sub 對象名_keypress(keyascii as integer)
……
end sub
keyascii可以識別按鍵ASCII碼,例如按下“A”鍵,keyascii的值為65,而按下“a”時,其值為97
例題:
利用keypress事件可以過濾鍵盤的輸入、識別用戶是否按下特定的箭、實現大小寫的轉換。
代碼:
private sub text1_keypress(keyascii as integer)
keyascii=asc(ucase(chr(keyascii)))
if keyascii=13 then
command1.setfocus
end if
end sub
ascii=13是按下enter鍵是的值,如果keyascii=0,則會封鎖鍵盤