如果对Datagird1 设置了 Set DataGrid1.DataSource = Dev.rsCmdKc那么 直接对 Dev.rsCmdKc 做 Move操作 移动到对应的记录， Datagrid1 就会自动变到那一行了 。 比如 选中第12行 ： Dev.rsCmdKc.Move 12, 0执行后 DataGrid1就显示12行为当前行
