Question

vb6.0-form的keydown事件无法引发

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Select Case KeyCode Case vbKeyA Image1.Move Image1.Left + 100, 720 Case vbKeyP Image2.Move Image2.Left + 100, 3120 Case vbKeyN Image3.Move Image3.Left + 100, 2040End Select
执行此段程式码时，常常按了对应的按键却没有反应，为什麼？

Answer 1

在窗体属性窗口中设置
.KeyPreview = True

或者，在 Form_load() 添加：
'Private Sub Form_Load()

Me.KeyPreview = True

'End Sub