半路夫妻里妮可的结局:VB编程问题,简单我也不会%………………
按f1的时候显示,第一个,按f3的时候显示第二个
高手帮忙
小弟在编程这方面还是菜鸟
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF1 Then
Form2.Show
ElseIf KeyCode = vbKeyF3 Then
Form3.Show
End If
End Sub
或者
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF1: Form2.Show
Case vbKeyF3: Form3.Show
End Select
End Sub
来完了呵,楼上说的对
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) 是按下窗体发生的接受键盘的CODE
If KeyCode = vbKeyF1 Then 判断键盘按键
Form2.Show
ElseIf KeyCode = vbKeyF3 Then
Form3.Show
End If
End Sub
我给你加下注释吧,让你知道是为什么会弹出窗体
在Form1中添加:
Private Sub form_keydown(keycode As Integer, shift As Integer)
If keycode = vbKeyF2 Then Form2.Show: Form1.Hide
End Sub
在Form2中添加:
Private Sub form_keydown(keycode As Integer, shift As Integer)
If keycode = vbKeyF1 Then Form1.Show: Form2.Hide
End Sub