Form to calculate the fines .... (1 Viewer)

[Milade8080]

Hi
I need a form to calculate the fines as follows:

TXTBOX1 ---> Specified date to pay taxes
TXTBOX2 ---> Amount of tax
TXTBOX3 ---> Date on which the tax is paid
TXTBOX4 ---> The amount paid for taxes
TXTBOX5 ---> Calculation Date
TXTBOX6 ---> Amount of fines

-----------------------------------------------------------------
IF(AND(TXTBOX1>=TXTBOX3;TXTBOX4=TXTBOX2) ---> TXTBOX6 =0
IF(AND(TXTBOX1>=TXTBOX3;TXTBOX4 TXTBOX6 = (TXTBOX2-TXTBOX4)*0.02*DATEDIF(TXTBOX1;TXTBOX5;"M")
IF(AND(TXTBOX1 TXTBOX6 = TXTBOX2*0.02*DATEDIF(TXTBOX1;TXTBOX3;"M")
IF(AND(TXTBOX1 TXTBOX6 = (TXTBOX2*0.02*DATEDIF(TXTBOX1;TXTBOX3;"M")+((TXTBOX2-TXTBOX4)*0.02*DATEDIF(TXTBOX3;TXTBOX5;"M")
-------------------------------------------------------------
DATEDIF is the distance between two different dates

 

[vbaInet]

I'm not sure if you're asking for some help with a specific task or if you're telling us what you want your form to do?

 

[vbaInet]

So start with Textbox1 and tell us what you are trying to do. And also show us what you've tried.

 

[Milade8080]

I'm not sure if you're asking for some help with a specific task or if you're telling us what you want your form to do?

TXTBOX1 ---> Specified date to pay taxes
TXTBOX2 ---> Amount of tax
TXTBOX3 ---> Date on which the tax is paid
TXTBOX4 ---> The amount paid for taxes
TXTBOX5 ---> Calculation Date
Txt Box6 ---> Amount of fines
--------------------------------------------------------------
IF (TXTBOX1>=TXTBOX3) And (TXTBOX4=TXTBOX2) --> Txt Box6= 0
IF (TXTBOX1>=TXTBOX3) And (TXTBOX4<TXTBOX2) --> Txt Box6= (TXTBOX2-TXTBOX4)*0.02* distance between two dates TXTBOX1 and TXTBOX5 by month
IF (TXTBOX1<TXTBOX3) And (TXTBOX4=TXTBOX2) --> Txt Box6= (TXTBOX2*0.02* distance between two dates TXTBOX1 and TXTBOX3 by month
IF (TXTBOX1<TXTBOX3) And (TXTBOX4<TXTBOX2) --> Txt Box6= (TXTBOX2*0.02* distance between two dates TXTBOX1 and TXTBOX3 by month
+ (TXTBOX2-TXTBOX4)*0.02* distance between two dates TXTBOX3 and TXTBOX5 by month

 

[vbaInet]

You're showing me a bunch of calculations without explaining your objective.