［原创分享］绑定和半绑定在窗体录入中的应用

lin2003_lin · 发表于 2012-7-11 22:56:31

好好学习

huangli0356 · 发表于 2012-11-9 11:23:57

顶上去先..

huangli0356 · 发表于 2012-11-9 11:24:16

这个在实际应用当中很有用处..谢谢分享.

ALUZER · 发表于 2012-11-15 21:10:13

解压密码是多少？

灰太郎 · 发表于 2012-11-25 10:24:16

yyyyyyyyyyyy

olderdream2007@ · 发表于 2013-9-14 23:13:58

Private Sub Form_Current()
On Error Resume Next
Dim ctl As Control

If Me.NewRecord Then
      Call cmdAdd_Click
Else
      For Each ctl In Me.Controls
         ctl.Value = Me.Recordset("F" & Mid(ctl.Name, 4))
      Next
End If

End Sub

这个事件一直没有理解请出。清明白的高人指点下？（不知道这个是啥事件也不知道这个代码---）

olderdream2007@ · 发表于 2013-9-14 23:20:37

Option Compare Database
Option Explicit
Dim blnAllowUpdate As Boolean '是否允许保存对记录的修改

Private Sub cmdSave_Click()
On Error GoTo Err_cmdSave_Click

blnAllowUpdate = True
DoCmd.RunCommand acCmdSaveRecord
blnAllowUpdate = False

Err_cmdSave_Click:
Call Form_Error(Err.Number, acDataErrContinue)
End Sub

blnAllowUpdate 好像没有实际意义吧，开始都是TRUE. 请高人指点下为什么？谢谢

327531347 · 发表于 2014-5-7 15:44:20

kanle

417040678 · 发表于 2014-12-30 09:45:15

谢谢，学习了

xiaomachicehng · 发表于 2015-1-5 11:52:32

学习一下

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

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

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

[窗体] ［原创分享］绑定和半绑定在窗体录入中的应用

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