一个vb程序写法

来源:百度知道 编辑:UC知道 时间:2024/05/24 14:43:02
我想摁一下回车,就从form1换到form2
我是这么写的:
Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then Form1.Visible = False
If KeyCode = 13 Then Form2.Visible = True

End Sub
可是,运行时没有反应。为什么呢?那该怎么写啊

设置窗体的 KeyPreview 属性为 True

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
Form1.Visible = False
Form2.Visible = True
' Form2.SetFocus 如果不行就加上
End If
End Sub

图片框获得焦点了么?