請問諸高手如何在vb6中響應"Ctrl+回車"?就像qq中用這個來發送消息一樣？

熱心網友

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Const Ctrl = 2CtrlDown% = (Shift And Ctrl)EnterDown% = (KeyCode = 13)If EnterDown% And CtrlDown% ThenMsgBox "你按下了Ctrl+Enter", vbOKOnly, "Hi"End IfEnd Sub