主题：版主帮忙看看，代码不对!!!xiexie

 

If Vbl IsNot Nothing Then
        Dim wz As long = Tables("职务变动基础信息").FindRow(Vbl)
        If wz >= 0 Then
          Tables("职务变动基础信息").Position = wz
        End If
       End If

这段代码的目的在于打开职务变动人员基础信息录入窗口是自动定位到录入的该人员！！！
但发现有问题，也就是光标的定位！！