以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么设置把table控件的tab顺序跳过？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172535)
--  作者：xxfoxtable
--  发布时间：2021/10/18 14:17:00
--  怎么设置把table控件的tab顺序跳过？

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顺序跳过？
--  作者：有点蓝
--  发布时间：2021/10/18 14:26:00
--  
代码在什么事件？
--  作者：xxfoxtable
--  发布时间：2021/10/18 14:28:00
--  
 textbox1的keydown事件
[此贴子已经被作者于2021/10/18 14:28:12编辑过]
--  作者：有点蓝
--  发布时间：2021/10/18 14:36:00
--  
……
e.cancel=true
        txt1.Select
        e.Form.Controls("NumericComboBox2").value=Tables("序号").Rows.Count
    End If
End If