我想在datagrid上按【下】鍵,然後就自動跳到下一格
下面是我的程式碼:
Private Sub DataGrid1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode >= 37 And KeyCode <= 40 Then
SendKeys ("{enter}")
  SendKeys ("{down}")
  MsgBox (KeyCode)
End If
End Sub
結果造成不斷網下一格跳,最後當機
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(7) 人氣()