vb中的keyup,keypress,keydown事件的區別？
uj5u.com熱心網友回復：
keypress事件只針對“可列印字符鍵”，是某個字符鍵已經按下、并且已經有一些“先期處理”之后觸發。keydown事件是鍵盤上任意鍵按下時觸發（個別“系統級功能”鍵除外），
并且有一個“按鍵碼”（虛擬鍵位碼）標識是哪個鍵按下。
大部分鍵在按下后不放開、延時一定時間后，會持續不斷的觸發 keydown事件。
keyup事件，跟keydown事件類似，只是是“放開后”觸發。
并且“放開”是不可能持續觸發的，也就是放開一次就只能觸發一次。
keydown、keyup這兩個事件，只針對“鍵”而不是針對“字符”，比如：
1. 你在主鍵盤區按下數字鍵1，跟在右邊小鍵盤區按下數字鍵1，它們的KeyCode是不相等的；
2. 單獨按下字符鍵A，跟“先按下Shift不放、再按字符鍵A”，
在“字符鍵A按下后”產生的KeyCode，這兩種情況下都是一樣的。
uj5u.com熱心網友回復：
首先，它們觸發的時間順序是 KeyDown - KeyPress - KeyUp。其次，事件的引數不同。
KeyPress 只有一個引數 KeyAscii。例如你按下了大寫 A 就會回傳 65——Asc("A") = 65。也就是說，它只對有 ASCII 編碼的鍵有效。
KeyDown 和 KeyUp 都有兩個引數：KeyCode 和 Shift。
KeyCode 是鍵碼，是一個數字。不過 VB 有一些鍵碼常量可幫助到你：vbKeyA, vbKeyW, vbKeyF1, vbKeyPgUp 等等。你可以不用去記它們的數值。
Shift 表示 Ctrl, Shift 和 Alt 有哪個或哪幾個按了下去。也有專用的常量：
vbShiftMask = 1
vbCtrlMask = 2
vbAltMask = 4
你可以用 (Shit And vbShiftMask) 來檢查 Shift 鍵是否按下。余類推。
uj5u.com熱心網友回復：
實際上就是一個按鍵按下時的三個動作分解uj5u.com熱心網友回復：
KeyDown、KeyUp 事件
這些事件是當一個物件具有焦點時按下 ( KeyDown ) 或松開 ( KeyUp ) 一個鍵時發生的。（要解釋 ANSI 字符，應使用 KeyPress 事件。）
語法
Private Sub Form_KeyDown(keycode As Integer, shift As Integer)
Private Sub object_KeyDown([index As Integer,]keycode As Integer, shift As Integer)
Private Sub Form_KeyUp(keycode As Integer, shift As Integer)
Private Sub object_KeyUp([index As Integer,]keycode As Integer, shift As Integer)
KeyDown 和 KeyUp 事件包括下列部分：
部分 描述
object 一個物件運算式，其值是“應用于”串列中的一個物件。
index 是一個整數，它用來唯一標識一個在控制元件陣列中的控制元件。
keycode 是一個鍵代碼，諸如 vbKeyF1 （ F1 鍵）或 vbKeyHome （ HOME 鍵）。要指定鍵代碼，可使用物件瀏覽器中的 Visual Basic ( VB ) 物件庫中的常數。
shift 是在該事件發生時回應 SHIFT ,CTRL 和 ALT 鍵的狀態的一個整數。shift 引數是一個位域，它用最少的位回應 SHIFT 鍵（位 0 ）、CTRL 鍵（位 1 ）和 ALT 鍵（位 2 ）。這些位分別對應于值 1、2 和 4。可通過對一些、所有或無位的設定來指明有一些、所有或零個鍵被按下。例如，如果 CTRL 和 ALT 這兩個鍵都被按下，則 shift 的值為 6。
說明
對于這兩個事件來說，帶焦點的物件都接收所有擊鍵。一個表單只有在不具有可視的和有效的控制元件時才可以獲得焦點。雖然 KeyDown 和 KeyUp 事件可應用于大多數鍵，它們最經常地還是應用于：
擴展的字符鍵如功能鍵等。
定位鍵。
鍵盤修飾鍵和按鍵的組合。
區別數字小鍵盤和常規數字鍵。
在需要對按下和松開一個鍵都回應時，可使用 KeyDown 和 KeyUp 事件程序。
下列情況不能參考 KeyDown 和 KeyUp 事件：
表單有一個 CommandButton 控制元件，并且 Default 屬性設定為 True 時的 ENTER 鍵。
表單有一個 CommandButton 控制元件，并且 Cancel 屬性設定為 True 時的 ESC 鍵。
TAB 鍵。
KeyDown 和 KeyUp 用兩種引數解釋每個字符的大寫形式和小寫形式：keycode —顯示物理的鍵（將 A 和 a 作為同一個鍵回傳）和 shift —顯示 shift + key 鍵的狀態而且回傳 A 或 a 其中之一。
如果需要測驗 shift 引數，可使用該引數中定義各位的 shift 常數。該常數有下列值：
常數 值 描述
vbShiftMask 1 SHIFT 鍵的位屏蔽。
VbCtrlMask 2 CTRL 鍵的位屏蔽。
VbAltMask 4 ALT 鍵的位屏蔽。
該常數用作位屏蔽。它可被用來測驗任何鍵組合。
測驗一個條件時，首先將每個結果分配給一個臨時整數變數，然后將 shift 與一個位屏蔽進行對比。如下例，可用 And 運算子和 shift 引數一起來測驗條件是否大于 0。該條件說明該修正鍵被按下：
ShiftDown = (Shift And vbShiftMask) > 0
可按此例在一個程序中測驗任何條件的組合：
If ShiftDown And CtrlDown Then
注意 如果 KeyPreview 屬性被設定為 True，則一個表單先于該表單上的控制元件接收到此事件。可用 KeyPreview 屬性來創建全域鍵盤處理例程。
uj5u.com熱心網友回復：
我進來只是看看趙四老師又復制啥了uj5u.com熱心網友回復：
表單里放一個文本框，然后貼下面代碼，然后挨個鍵按過去，看看立即視窗的輸出差異以及顯示順序，立馬就明白了
Option Explicit
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Debug.Print "keydown", KeyCode, Shift
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
Debug.Print "keypress", KeyAscii
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
Debug.Print "keyup", KeyCode, Shift
End Sub
uj5u.com熱心網友回復：
KeyDown、KeyUp 事件，這些事件是當一個物件具有焦點時按下 ( KeyDown ) 或松開 ( KeyUp ) 一個鍵時發生的。（要解釋 ANSI 字符，應使用 KeyPress 事件。）
KeyDown、KeyUp 事件示例
本例演示一個回應 F2 以及與 ALT，SHIFT 和 CTRL 相聯的組合鍵類屬鍵盤處理程式。鍵常數列在物件瀏覽器中的 Visual Basic (VB) 物件庫里。要嘗試這個例子，可將代碼粘貼到一個含 1 個 TextBox 控制元件的表單的宣告部分，然后按 F5 鍵和 ALT+F2, SHIFT+F2,和 CTRL+F2 組合鍵。
Private Sub Text1_KeyDown (KeyCode As Integer, Shift As Integer)
Dim ShiftDown, AltDown, CtrlDown, Txt
ShiftDown = (Shift And vbShiftMask) > 0
AltDown = (Shift And vbAltMask) > 0
CtrlDown = (Shift And vbCtrlMask) > 0
If KeyCode = vbKeyF2 Then ' 顯示鍵組合.
If ShiftDown And CtrlDown And AltDown Then
Txt = "SHIFT+CTRL+ALT+F2."
ElseIf ShiftDown And AltDown Then
Txt = "SHIFT+ALT+F2."
ElseIf ShiftDown And CtrlDown Then
Txt = "SHIFT+CTRL+F2."
ElseIf CtrlDown And AltDown Then
Txt = "CTRL+ALT+F2."
ElseIf ShiftDown Then
Txt = "SHIFT+F2."
ElseIf CtrlDown Then
Txt = "CTRL+F2."
ElseIf AltDown Then
Txt = "ALT+F2."
ElseIf SHIFT = 0 Then
Txt = "F2."
End If
Text1.Text = "You pressed " & Txt
End If
End Sub
KeyPress 事件，此事件當用戶按下和松開一個 ANSI 鍵時發生。
KeyPress 事件示例
本例將輸入到 TextBox 控制元件的文本轉換為大寫。要嘗試這個例子，可將代碼粘貼到一個包含一個 TextBox 控制元件表單的宣告部分，然后按 F5 鍵并在 TextBox 中輸入內容。
Private Sub Text1_KeyPress (KeyAscii As Integer)
Char = Chr(KeyAscii)
KeyAscii = Asc(UCase(Char))
End Sub
uj5u.com熱心網友回復：
你上道了！
uj5u.com熱心網友回復：
這個.net用法一樣嗎？轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/55847.html
標籤：VB基礎類
下一篇：MSHFlexGrid顯示問題