Private Sub text3_BeforeUpdate(Cancel As Integer)
If Me![text3] = YEZ Then
Me![bikouseihinnnouryoku] = 25 * 24 * 60 * 60 / Me![saikuru] * Me![torikazu]
End If
End Sub

执行后 Me![bikouseihinnnouryoku] 文本框没有任何反应
是不是要先声明