请问:在窗体中锁定一条记录,这段代码怎么写

一杯绿茶 · 发表于 2006-7-4 18:44:00

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

请高手指点一下.

andymark · 发表于 2006-7-4 19:04:00

一杯绿茶 · 发表于 2006-7-4 19:53:00

谢谢了,不过在添加记录的时候提示错误: "94" 无效使用Null

andymark · 发表于 2006-7-4 21:43:00

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:00

呵呵~~原来如此啊!!谢谢了!![em10]

dahai1001 · 发表于 2006-8-31 01:10:00

kankan

dahai1001 · 发表于 2006-8-31 01:11:00

zaikankan

dahai1001 · 发表于 2006-8-31 01:11:00

bumingbai

罗春芳 · 发表于 2008-8-22 16:05:34

[:36]

yangzikang · 发表于 2008-10-4 11:20:01

看看先

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 请问:在窗体中锁定一条记录,这段代码怎么写

本帖子中包含更多资源

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)