Foxtable(狐表)用户栏目专家坐堂 → 回车跳到下个文本框


  共有4053人关注过本帖树形打印复制链接

主题:回车跳到下个文本框

帅哥哟,离线,有人找我吗?
qaz17909
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:816 积分:9227 威望:0 精华:0 注册:2017/1/26 14:38:00
回车跳到下个文本框  发帖心情 Post By:2020/7/31 14:07:00 [只看该作者]

在窗口中有三个文本框:TextBox1,TextBox2,TextBox3,想当输入完TextBox1时按回车键可以自动跳到TextBox3然后可以直接录入,我在TextBox1的keydown事件中代码如下未能实现:
If e.keycode = keys.enter Then
    Dim tx As WinForm.TextBox = e.Form.Controls("TextBox3")
    tx.Select()
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112380 积分:572162 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/31 14:10:00 [只看该作者]

If e.keycode = keys.enter Then
e.cancel = true
    Dim tx As WinForm.TextBox = e.Form.Controls("TextBox3")
    tx.Select()
End If

 回到顶部