怎样使键盘上的回车键等于CMD1

如果是在textbox的输入时按回车
这么写就可以了

Private Sub Command1_Click()
MsgBox "按了回车！"
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Command1_Click
End If
End Sub

否则就要用到hook

首先把FORM1的KEY……属性(具体忘了,总之只有一个是KEY开头的)设置为True
然后在窗体的KeyPress事件下加入代码:
If KeyAscii=13 Then'//13是Enter键的Ascii码
Call CMD1_Click'//事件自己改
End If

将CMD的default属性设置为true，那么按了回车，就默认＼的是按了按钮，