Small Code In Need Of Review

hi. I am trying to write a code to sum the total cost of all jobs that are selected as 'yes' in a combo box.

Once the user selects 'yes' in a combo box, they enter in a cost for that specific job. Each client may have 10s of jobs. I need to write a code that will sum up all the 'yes' selected jobs for a client. I know it should be an 'if' statement but I can't seem to get it to work. I need this value for a report. How would I do this and where would i put the code.

Help is appreciated.

Here is the code that I was thinking of, I don't think its right but it might be a start.


Dim Count As Variant
Dim CountImplementedTotal As Variant

CountCost = 0
CountImplementedTotal = 0


Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordSet("ECM Details")
Do While Not rst.EOF
If rst![AUDIT ID] = Forms![audit info]![AUDIT ID] Then
If rst![Has Measure been Selected] = "YES" Then
Count = Count + rst![Total Measure Cost]
End If
End If
rst.MoveNext
Loop

Text47.Text = Count