'当在输入框中输入内容时,按下回车键,则调用按钮事件 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 13 Then Call Command1_Click End If End Sub
'当文本框内容改变时,立即调用按钮事件 Private Sub Text1_Change() Call Command1_Click End Sub