7,763
社区成员
发帖
与我相关
我的任务
分享请教如何不用按钮而用键盘的一个按键来实现按钮的功能呢?
比较菜的问题,比如本来有一个按钮,点击后最大化窗口,现在不用这个按钮,而只用一个按键,比如A,按A和点击按钮有相同的作用.
不知道哪位高手能指点一下?
不知道哪位高手能指点一下?
...全文
请发表友善的回复…
发表回复
look4sword 2003-12-03
- 打赏
- 举报
谢谢!
northwolves 2003-12-02
- 打赏
- 举报
' PRESS KEY [A]
Private Sub Command1_Click()
Me.WindowState = 2
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyA Then Command1_Click
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Command1_Click()
Me.WindowState = 2
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyA Then Command1_Click
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
