如何对Ctrl +回车键作响应

来源：百度知道编辑：UC知道时间：2024/07/03 14:40:14

在文本框Text1中输入文本时希望在按下Ctrl +回车键时程序能作响应，
类似于QQ中的聊天框，输入文字完毕后按一下Ctrl +回车键,内容就被发送出去，

请问捕捉Ctrl +回车键事件用哪个代码呢？

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 2 And KeyCode = 13 Then
MsgBox (Text1.Text)
End If
End Sub

发现按下回车时检测ctrl键是否被按下

就用热键啊,自己找找啊

在键盘的弹起,或按下事件中写代码.
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)

If KeyCode = 13 And Shift = 2 Then
'执行的代码
End If

End Sub