如何定位光标？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：定位光标1.jpg

如图

验证代码，datachanged 代码如下

Select Case e.DataCol.Name '防止电话重复

Case "tel1","tel2","tel3"

Dim dr As DataRow = e.DataRow

If dr.IsNull(e.DataCol.name) = False

If e.DataTable.Select("tel1 = '" & e.NewValue & "' Or tel2 = '" & e.NewValue & "' Or tel3 = '" & e.NewValue & "'") .Count > 1 Then

dr(e.DataCol.name) = e.OldValue

MessageBox.Show("请勿重复录入电话号码!")

End If

End Select

输入单位电话1 确认的时候，如果电话有重复，弹出对话框，确认后光标重新定位到电话2，如何让光标从新定位到电话1？

主题：如何定位光标？