不動産仲介手数料計算

f:id:bengoshigoemon:20210406062651j:plain

If val1 <= 2000000 And 0 < val1 Then
val2 = Round((val1 * 0.05) * 0.1)
ElseIf val1 <= 4000000 And 2000000 < val1 Then
val2 = Round((2000000 * 0.05) * 0.1)+ Round((val1-2000000 * 0.04) * 0.1)
ElseIf4000000 < val1 Then
val2 = Round((2000000 * 0.05) * 0.1)+ Round((val1-2000000 * 0.04) * 0.1)+Round((val1 - 4000000) * 0.03 * 0.1)
ElseIf val1 = 0 Then
val2 = 0
End If