Subtotals on a form

[MrsNic]

I have a simple form that lists training sessions someone has attended. Some have been paid for (shown with a tick box, some haven't. I ant to be able to toal the 2 separately so that I can take the paid total from the unpaid total. I know it must be simple, but I just can't think.

The two tables concerned are Session - which has the cost of the training session and stafftraining which has the information regarding if a person has completed the training.

Many thanks

 

[jadams0173]

If the information is displayed in the form and you want to perform the math after that, you can loop through the text boxes that contain the $ and if the box is checked add the values and if the box is checked assign that value to a different variable.

Maybe someting like:

Dim ctl As Control

For Each ctl In Me.Controls

    With ctl
        If TypeOf ctl Is TextBox Then 
             If Textbox.Name="YourTextBox" and Checkbox=1
          paidsum=paidsum+yourtexbox
             Else
          unpaid=unpad+yourtextbox  
        End If
    End With
Next

Then you can display "paidsum" and "unpaid" in text boxes on the form. HTH