VB文本框怎样实现回车键事件？
1、首先，我们双击窗体空白处进入代码窗口。
2、然后我们在事件中找到Click事件。
3、这个时候我们便可以开始编写代码测试【Print "我是Click单击属性！"】。
4、然我们开始运行测试。
5、启动后，我们在窗体空白处单击。
6、这个时候我们将可以看到测试的效果。
注意事项：
VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序。
事实上 KeyPress、KeyDown、KeyUp、Change这四种事件过程都可以判断是否按了回车键：
Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then MsgBox "你按了回车键！"End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = 13 Then MsgBox "你按了回车键！"End SubPrivate Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)If KeyCode = 13 Then MsgBox "你按了回车键！"End SubPrivate Sub Text1_Change()If Mid(Text1.Text, Text1.SelStart, 1) = vbLf Then MsgBox "你按了回车键！"End Sub相比较而言，用Change事件来实现是最笨、最不适合的方式，只能在多行文本框（MulitLine属性为True）使用，而且会出现误判的情况（自己试试就知道）。最佳方式是KeyPress，没有为什么，它就是最佳。
在edit的events属性中有一个OnKeyPress的属性，双击后写下你想要的操作就ok了。下面有张示意图。
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
MsgBox "你按下了回车键！"
End If
End Sub
我纠正一下啊，判断键盘功能键不是这个事件，是Keycode
KeyDown事件
VB文本框怎样实现回车键事件？视频
相关评论：
谷以羽在edit的events属性中有一个OnKeyPress的属性，双击后写下你想要的操作就ok了。下面有张示意图。
谷以羽1、首先，我们双击窗体空白处进入代码窗口。2、然后我们在事件中找到Click事件。3、这个时候我们便可以开始编写代码测试【Print "我是Click单击属性！"】。4、然我们开始运行测试。5、启动后，我们在窗体空白处单击。6、这个时候我们将可以看到测试的效果。注意事项：VB拥有图形用户界面（GUI）和快速应用程...
谷以羽用API函数：sendmessage向窗口发送一个WM_KEYDOWN和WM_KEYUP详细就可以了。
谷以羽拖一个TextBox到窗体中，设置该TextBox的MultiLine属性为true，不然没有回车键效果！在该TextBox上双击，默认的事件为Change，更改为KeyPress事件，在该事件中添加代码如下：Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 9 Then KeyAscii = 13 ElseIf KeyAscii = 13 Then KeyAscii =...
谷以羽在vb里,常量vbcr对应回车键的ascii,就是10;常量vblf对应换行键的ascii,就是13;vbcrlf是回车加换行。vbkeyenter需要定义常量13才能使用 chunxue2002 | 发布于2011-08-11 举报| 评论 1 0 那是因为VB没有将回车键定义为 vbKeyEnter常数,你可以这样定义:Private Const vbKeyEnter = 13Private Sub Text1_Key...
谷以羽可以这样写:Sub 按钮1_单击()call TXT_change()End Sub 这个TXT_change()的SUB就是你由文本框所定义的过程 ' 调用一个子过程。Call PrintToDebugWindow("Hello World")' 上面的语句将控制转移到下面的子过程。Sub PrintToDebugWindow(AnyString)Debug.Print AnyString ' 在“立即”窗口中显示。
谷以羽回答：用文本框的KeyPress事件实现: Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click End IfEnd SubPrivate Sub Command1_Click() Print Text1.TextEnd Sub
谷以羽1.textbox有一个 Locked属性，设为True,就不能被编辑了 2.textbox有一个 MaxLength属性，用来限制文本框可输入字符的长度，你设成8,它就只能输8个字；设成10，就只能输10个字。设为0就是没有长度限制。但你这个情况必须不断试才能得到这个具体的值，因为不同的字号，不同字体，相同一个文本框能...
谷以羽思路很简单:通过textbox的keypress事件来捕获键盘输入，输入输入的是回车键，则调用Button_click事件 代码如下：Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown If e.KeyCode = 13 Then call Button1_Click()end if...
谷以羽用文本框的KeyPress事件实现：Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click End IfEnd SubPrivate Sub Command1_Click() Print Text1.TextEnd Sub
