Kod:
Private Sub PAYDOSSURESI_AfterUpdate()
If Me.VARDIYATURU = 8 Then
Me.AKTIFSURE = Me.AKTIF8
Else
If Me.VARDIYATURU = 10 Then
Me.AKTIFSURE = Me.AKTIF10
Else
Me.AKTIFSURE = Me.AKTIF12
End If
End If
End Sub