doubleClick事件
Dim idx As Integer = Tables("员工").FindRow(e.Row.DataRow)If idx > -1 Then Tables("员工").Position = idxEnd If