Office中国论坛/Access中国论坛

标题: 请问:在窗体中锁定一条记录,这段代码怎么写 [打印本页]

作者: 一杯绿茶 时间: 2006-7-4 18:44
标题: 请问:在窗体中锁定一条记录,这段代码怎么写
[attach]18848[/attach]
[attach]18849[/attach]

如图:勾选记录锁定后,锁定此条记录不被编辑,取消后则可以修改.

请高手指点一下.

作者: andymark 时间: 2006-7-4 19:04
[attach]18851[/attach]

作者: 一杯绿茶 时间: 2006-7-4 19:53
谢谢了,不过在添加记录的时候提示错误: "94" 无效使用Null

作者: andymark 时间: 2006-7-4 21:43
Private Sub Chk()
Dim Ctr As Control
For Each Ctr In Controls
If (TypeOf Ctr Is TextBox) Then
If Me.锁定 = -1 Then
Ctr.Locked = True
Else
Ctr.Locked = False
End If

End If
Next
End Sub

作者: 一杯绿茶 时间: 2006-7-5 01:25
呵呵~~原来如此啊!!谢谢了!![em10]

作者: dahai1001 时间: 2006-8-31 01:10
kankan

作者: dahai1001 时间: 2006-8-31 01:11
zaikankan

作者: dahai1001 时间: 2006-8-31 01:11
bumingbai

作者: 罗春芳 时间: 2008-8-22 16:05
[:36]

作者: yangzikang 时间: 2008-10-4 11:20
看看先

作者: wang1950317 时间: 2008-10-4 11:47
学习！[:17]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)