窗体计算控件数据刷新后，如何更新到数据表中

钟庆泉　发表于：2009-07-18 13:33:54 　

如何将text36中的计算结果，更新到顾客满意度中去

点燃一支烟发表于：2009-07-18 14:00:44

Private Sub 服务及时性_AfterUpdate()
Me.顾客满意度 = Nz(Me.服务及时性) + Nz(Me.服务态度) + Nz(Me.服务效果)
End Sub

Private Sub 服务态度_AfterUpdate()
Me.顾客满意度 = Nz(Me.服务及时性) + Nz(Me.服务态度) + Nz(Me.服务效果)
End Sub

Private Sub 服务效果_AfterUpdate()
Me.顾客满意度 = Nz(Me.服务及时性) + Nz(Me.服务态度) + Nz(Me.服务效果)
End Sub

对上述三个控件的更新后事件写如上事件过程代码

点燃一支烟发表于：2009-07-18 14:04:48

或者：

Public Sub jsmyd()
Me.顾客满意度 = Nz(Me.服务及时性) + Nz(Me.服务态度) + Nz(Me.服务效果)
End Sub

Private Sub 服务及时性_AfterUpdate()
Call jsmyd
End Sub

Private Sub 服务态度_AfterUpdate()
Call jsmyd
End Sub

Private Sub 服务效果_AfterUpdate()
Call jsmyd
End Sub

总记录：2篇页次：1/1 9 1 :

Access交流中心