foxxrunning
Member
- Local time
- Yesterday, 20:20
- Joined
- Oct 6, 2019
- Messages
- 109
Do I need to place that assignment in each of the If sections or only once? I placed it in each If statement and it looks wrong.
Option Compare Database
Option Explicit
Function SplitTotal(Code1 As String, Code2 As String)
If Code1 = "AL" Or Code1 = "AS" Then
TotalA = [SPLIT1] * [Fee]
SplitTotal = TotalA
If Code1 <> "AL" Or Code1 <> "AS" Then
TotalA = [Amount]
SplitTotal = TotalA
If Code2 = "AF" Then
TotalB = [Split2] * [Fee]
SpltiTotal = TotalB
If Code2 <> "AF" Then
TotalB = Null
SplitTotal = TotalB
End If
End Function
Option Compare Database
Option Explicit
Function SplitTotal(Code1 As String, Code2 As String)
If Code1 = "AL" Or Code1 = "AS" Then
TotalA = [SPLIT1] * [Fee]
SplitTotal = TotalA
If Code1 <> "AL" Or Code1 <> "AS" Then
TotalA = [Amount]
SplitTotal = TotalA
If Code2 = "AF" Then
TotalB = [Split2] * [Fee]
SpltiTotal = TotalB
If Code2 <> "AF" Then
TotalB = Null
SplitTotal = TotalB
End If
End Function