'文本框键盘按键事件-回车
Private Sub TextBox_Pwd_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
MsgBox "OK"
End If
End Sub
vba键盘事件
最新推荐文章于 2025-06-27 16:26:00 发布
'文本框键盘按键事件-回车
Private Sub TextBox_Pwd_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
MsgBox "OK"
End If
End Sub