vb.net中textbox输入完后如何直接按回车

如何在vb.net中textbox输入完后按回车直接运行button的?

回车和button是同一个功能的,但是怎么能让这2个都能用?
1楼的做法我已经试过了,不行的,command1_click这条不行,不加()不行,加了又说“应为。。”具体忘记了。

思路很简单:通过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
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  推荐于2018-03-13
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown

If e.KeyCode = 13 Then Button1.PerformClick()

End Sub本回答被网友采纳
第2个回答  2009-11-26
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
F()
End Sub

Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Return Then
F()
End If
End Sub
Private Sub F()
'
'你要实现的功能
'
End Sub
第3个回答  2019-03-19
点击界面属性,找到AcceptButton,选择你想绑定的按钮
第4个回答  2009-11-25
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
Command1_Click
End If
End Sub本回答被网友采纳

vb.net中textbox输入完后如何直接按回车
思路很简单:通过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...

vb.net文本框输入后按回车或tab判断是不是数字,不是就跳出提示框,怎么...
你用的都是vb6的代码,改成:Private Sub TextBox1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.LostFocus If IsNumeric(TextBox1.Text) = False Then MsgBox("输入有非数字字符,请重新输入", vbOKOnly, "友情提示")TextBox1.Focus()Return End If End ...

vb.net中如何实现按enter键焦点就移到下一个textbox
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown If e.KeyCode = Keys.Enter Then TextBox2.Focus()End If End Sub

vb.net回车切换下一个textbox
先把Form窗体的KeyPreview设置为True Private Sub Form_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then '回车键 SendKeys vbTab '模拟键盘发送TAB键 End If End Sub

VB.NET中的TextBox控件详解
】选项卡中向Form 的设计窗体拖入一个TextBox组件的后 我们可能并没有感觉到即使时这样一个简单的操作 Visual Basic Net都做了很多幕后工作 主要工作和步骤如下 首先实例化System Windows Forms TextBox类 并根据拖动到窗体的位置和形状分别设定TextBox实例的各个属性 我们看到的设计窗体 其实是Form 类的一个实例 ...

vb.net的textbox中可以正常输入英文数字切换到中文输入法一按键就退出...
PrivateSubText1_KeyPress(KeyAsciiAsInteger)If((KeyAscii>=48AndKeyAscii=65AndKeyAscii=97AndKeyAscii<=122))=FalseThenKeyAscii=0EndSub

VB的text怎么自动换行
qw623577789 采纳率:53% 擅长: VB VC++ C\/C++ C#\/.NET 其他回答 因为你没有把 TextBox 的 Multiline 设为 True。默认情况下,TextBox 是单行显示的(Multiline=False),遇到换行符就会直接忽略而连接前面的字符。这样所有的东西就在一行里面了。要解决这个问题,将 Multiline 设置为 True,ScrollBars 最好设置...

VB.NET中页面初期显示时按下enter键让焦点在五个textbox控件上顺序移动...
这样不好,应该使用 Table 键,按照 Table 键顺序来切换。因为回车往往用来确定你要按下页面的确定按钮。如果非要使用回车:Private Sub 文本框按下回车键(sender As Object, e As KeyEventArgs) Handles TextBox3.KeyDown, TextBox2.KeyDown, TextBox1.KeyDown If e.KeyCode = Keys.Enter Then Se...

vb.net。如何给textBox中的text赋值“换行符”和“n个空格”
首先你的textbox有一个属性得设置成多行、支持回车符才行 其次,换行符我记得直接用\\n就行 n个空格你就写个循环用,每次循环就加上" "就行。

vb.net textbox1选中的文本,拖放到textbox2?
2、完整的代码如下:Public Class Form1 Private MouseIsDown As Boolean = False Private Sub TextBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseDown '设置一个标志以显示鼠标已按下。MouseIsDown = True End Sub Private Sub ...

相似回答