Foxtable(狐表)用户栏目专家坐堂 → 怎么设置把table控件的tab顺序跳过?


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

主题:怎么设置把table控件的tab顺序跳过?

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


加好友 发短信
等级:七尾狐 帖子:1740 积分:16378 威望:0 精华:0 注册:2017/6/1 23:12:00
怎么设置把table控件的tab顺序跳过?  发帖心情 Post By:2021/10/18 14:17:00 [只看该作者]

If e.KeyCode = Keys.enter Then
    Dim txt1 As WinForm.TextBox = e.Form.Controls("TextBox1")
    If txt1.text>""
        Dim dr As DataRow=DataTables("序号").addnew
        dr("序号")=txt1.text
        dr.save
        txt1.text=""
        txt1.Select
        e.Form.Controls("NumericComboBox2").value=Tables("序号").Rows.Count
    End If
End If

 

我这样写,textbox1还是不能获得焦点

 

 怎么设置把table控件的tab顺序跳过?


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


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

代码在什么事件?

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


加好友 发短信
等级:七尾狐 帖子:1740 积分:16378 威望:0 精华:0 注册:2017/6/1 23:12:00
  发帖心情 Post By:2021/10/18 14:28:00 [只看该作者]

 textbox1的keydown事件
[此贴子已经被作者于2021/10/18 14:28:12编辑过]

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


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

……
e.cancel=true
        txt1.Select
        e.Form.Controls("NumericComboBox2").value=Tables("序号").Rows.Count
    End If
End If

 回到顶部