DSum With Multiple Criteria and Date Value

O

Okestra007

Joined
Sep 27, 2011
Messages
1
Reaction score
0
Can someone please tell me why I keep getting type mismatch error here?

Code: 
    Dim DisabilityChecks As Currency
    Dim UnemployementChecks As Currency
    Dim WorkersCompChecks As Currency
    Dim PayChecks As Currency
    
    DisabilityChecks = DSum("[SS_Disability]", Income_Activity, "CLIENT_KEY=" & CLIENT_KEY And "[Income_Period] = #" & [Income_Period] & "#")
    UnemployementChecks = DSum([Unemployment], Income_Activity, "CLIENT_KEY=" & CLIENT_KEY And "[Income_Period] = #" & [Income_Period] & "#")
    WorkersCompChecks = DSum([Workers_Comp], Income_Activity, "CLIENT_KEY=" & CLIENT_KEY And "Income_Period = #" & Income_Period & "#")
    PayChecks = DSum([Gross_Paycheck], Income_Activity, "CLIENT_KEY=" & CLIENT_KEY And "Income_Period = #" & Income_Period & "#")
    
    Me.Text37.Value = DisabilityChecks + UnemployementChecks + WorkersCompChecks + PayChecks
    Resident_Rent = (Me.Text37.Value) * 0.3
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

InsertCommand and Parameters 2
DSUM Date Criteria 3
dsum with multiple criteria and decimals 0
Dsum Problem with date criteria 1
Parameter Query with DSum 1
DSum in Query 3
Date Parameter Query 5
DSUM Help requested. 0

Top