Private Sub ISKONTO_ORANI_AfterUpdate()
Dim hesapla
Me.KAMU_FİYATI.Value = Me.PSF.Value - (Me.PSF.Value * Me.ISKONTO_ORANI.Value / 100)
Me.BIRIM_FIYATI.Value = (Me.KAMU_FİYATI - (Me.PSF.Value * Me.ISKONTO_ORANI.Value / 100)) / Me.AMBALAJ_ADEDI
End Sub
Kodun bu kısmını istediğiniz olayın içine koyarak bu hesaplamaları yaptırabilirsiniz.
Me.KAMU_FİYATI.Value = Me.PSF.Value - (Me.PSF.Value * Me.ISKONTO_ORANI.Value / 100)
Me.BIRIM_FIYATI.Value = (Me.KAMU_FİYATI - (Me.PSF.Value * Me.ISKONTO_ORANI.Value / 100)) / Me.AMBALAJ_ADEDI