主题：锁定行不允许移动

怎样编写代码来实现在窗体上点击修改按钮后锁定表行不允许移动其他行呢?

 BeforeSelChange事件加入下列代码

If e.OldRange.RowSel <> e.NewRange.RowSel '如果选择的是不同的行
    If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then '而且原来选择的是一个有效的数据行
   

 If  修改了 then
            e.Cancel = True
        End If
    End If
End If

我是实现单击修改数据按钮时实现此功能。这段代码只有在表的事件中完成的是在表中数据行值发生变化时才执行的。可是我的窗体未绑定数据表。输入文本框内容时表中的数据值还没发生变化的，不会执行这段代码的。所以在单击按钮事件中不会实现此功能的。有什么方法就是只要单击修改数据按钮就执行锁定行不允许移动行。

 参考

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=102308