主题：如何定位光标

如图

 

此主题相关图片如下：107.jpg

 

当我在　产品名称　列　打开　自定义输入界面，输入产品后，光标　还是定位在　产品名称　列，

我想让此时的光标在　“数量”　列

该如何设置呢？

自定义输入界面的代码如下

 

keydown 事件

Dim tbl As Table = Tables("窗口3_Table1")
If e.KeyCode = Keys.Up Then
    tbl.Position = tbl.Position - 1
    e.Cancel = True
ElseIf e.KeyCode = Keys.Down Then
    tbl.Position = tbl.Position + 1
    e.Cancel = True
ElseIf e.KeyCode = Keys.Enter Then
    If tbl.Current IsNot Nothing Then
        Tables("zhidai").Current("ptypeid") = tbl.Current("ptypeid")
        Tables("zhidai").Current("pfullname") = tbl.Current("pfullname")
        Tables("zhidai").Current("Standard") = tbl.Current("Standard")
        Tables("zhidai").Current("Unit1") = tbl.Current("Unit1")
        Tables("zhidai").Current("price") = tbl.Current("price")
        Tables("zhidai").current("gongxu")=tbl.Current("gongxu")
    End If
    e.Cancel = True   
    e.Form.Close()
End If

 

是不是在这里设置？

在这个窗口的AfterClose事件设置代码：

 

with Tables("XXX")

       Dim idx As integer = .Cols("yyy").Index

       .Select(.RowSel,Idx)

End With