Question

vb 禁用方向键

禁止vsflexgrid 控件使用方向键控制焦点。包括数字键中的方向键也不可以。

出的问题是这样的： 在进行单击时，都会判断某个单元格是否可编辑。但是当使用方向键改变焦点时，不会触发单击事件，所以出现BUG。

Answer 1

示例如下：（本上没有小键盘，数字键的键值自己算一下加上吧）
Private Sub VSFlexGrid1_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = 37 Or KeyCode = 38 Or KeyCode = 39 Or KeyCode = 40) Then
KeyCode = 0
End If
End Sub
Private Sub VSFlexGrid1_KeyDownEdit(ByVal Row As Long, ByVal Col As Long, KeyCode As Integer, ByVal Shift As Integer)
'处于编辑状态时也限制
If (KeyCode = 37 Or KeyCode = 38 Or KeyCode = 39 Or KeyCode = 40) Then
KeyCode = 0
End If
End Sub

Answer 2

提示：
在keydown中设置：
keycode = 37 ←
keycode = 38 ↑
keycode = 39 →
keycode = 40 ↓
的值为：空值

Answer 3

PSP头文字D不用FC锁定摇杆，操作模式默认十字键和摇杆都能控制方向