求教！关于锁定记录

zhongliping

我想做一个数据表视图的窗体，将前面的N条记录设为不可编辑，而之后的记录可以编辑，也可以增加新记录，不知如何实现，请多多指教！谢谢。

[此贴子已经被作者于2004-3-6 10:36:09编辑过]

宿命的风

这到是个新问题哦，如果用allowedition=true就整个全可以编辑了。
关注中！期待高手出招！~~~[em22]

paul16

在数据获得焦点事件中设定查看当前记录号，然后设定是否可编辑！

paul16

查看记录号可以参考：

Me.cmd记录.Caption = "目前是第" & Me.CurrentRecord & "个记录，共有" & Me.RecordsetClone.RecordCount & "记录"

zhongliping

按此法解决了，多谢！

宿命的风

以下是引用paul16在2004-3-6 13:29:21的发言：
在数据获得焦点事件中设定查看当前记录号，然后设定是否可编辑！

假设窗体中有10条记录，当前记录为第8条，如何设置前7条允许编辑？

zhongliping

我是将禁止编辑的字段设为锁定。
Dim I As Integer
Private Sub 字段_GotFocus()
I = Me.CurrentRecord
If I < 7 Then
[字段].Locked = True
Else
[字段].Locked = False
End If
End Sub

宿命的风

懂了！~谢谢！

真主

如果在订单出货管理表中，能不能设定成只要是财务审核过的送货单，本笔送货单记录和送货单子记录被锁定，而又可以通过另外一个按键来解出锁定

paul16

你可以在表中增加一个审核的字段名，类型为 是/否 ，通过更改该字段的值就可以了！