sum of Dlookup

[vicsaccess]

i'm needing a little help. i have a form based on a job with a tab control. one of the tabs has a subform for the different hours by craft that the job will encounter. i have a text box called txttotalcrafthours on my main form to sum the hours of all the crafts associated with the job but i'm running into a compile error:sub or function not defined pointing to my "sum" of the dlookup. any ideals?

    Dim x As Integer
    x = SUM(DLookup("Hours", "workquecraftt", "WorkQueID= 'me.WorkQueID.value'"))
    Me.txttotalcrafthours.Value = x

[June7]

Aggregate functions work in queries or textboxes, not in VBA.

Use domain aggregate functions in VBA.

Concatenate the reference to form control. If WorkQueID is number type field, do not use apostrophe delimiters - they are for text type.

x = DSum("Hours", "workquecraft", "WorkQueID=" & Me.WorkQueID)

If this form is Continuous or Datasheet, every record will show the same value in txttotalcrafthours. Should probably put the DSum() in textbox ControlSource.

What table is the subform bound to?

[pbaldy]

Why not use DSum() instead? Your syntax needs work too:

http://access.mvps.org/access/general/gen0018.htm

[vicsaccess]

thanks both of you, i don't know how you pull this off the top of your heads so fast. changed to DSum inside the text box control source and working great.