员工资料管理示例（原创）

fnsmydyang

一个原创示例，与大家一起分享，多提一点意见哟{:soso_e106:}

t小宝

谢谢分享原创作品

todaynew

可在窗体加载事件中给相同事件并且相同操作的控件一次性赋值一个函数，这样简单一些。做法是：

１、在窗体加载事件中写如下代码：
dim ctrl as control
for each ctrl in me.controls
    if ctrl.controlstype=acTextBox then '条件可根据需要增加
          ctrl.AfterUpdate="=AllAfterUpdate()"
    end if
next ctrl

２、写一个自定义函数：
function AllAfterUpdate()
　　Xg = True
end if

一生无悔

{:soso_e113:}谢谢分享

风中漫步

谢谢分享

Grant

谢谢分享

bbpst

谢谢分享,优秀章都敲上了,学习

wgh3g

谢谢分享

linfeiyang-

谢谢分享……

snqi

{:soso_e142:}