vb中如何獲得鍵盤方向鍵的鍵值

將窗體KeyPreview屬性設置為True並對Form_KeyDown事件編程，可以獲取鍵盤箭頭鍵的鍵值。實現方法如下：

Private?Sub?Form_Load()

'允許窗體攔截鍵盤按鍵

Me.KeyPreview?=?True

End?Sub

Private?Sub?Form_KeyDown(KeyCode?As?Integer,?Shift?As?Integer)

'?KeyCode?鍵盤碼是鍵盤上每個按鍵的唯壹編碼

'?在VB中，符號常數表示鍵盤碼，例如?vbKeyF1?表示F1鍵,

'?vbKeyHome?表示HOME鍵……?

Select?Case?KeyCode

Case?vbKeyLeft:?Print?"左箭頭鍵值："?+?CStr(KeyCode)

Case?vbKeyRight:Print?"右箭頭鍵值："?+?CStr(KeyCode)

Case?vbKeyUp:Print?"上箭頭鍵值："?+?CStr(KeyCode)

Case?vbKeyDown:?Print?"下箭頭鍵值："?+?CStr(KeyCode)

End?Select

End?Sub