>Here is the code that is causing the error in the combo box change event:
>
>select tecdpsc.dpscscal as tecscaln, tecdep.depnum, tecdep.depname
>from tecdpsc, tecdep
>where tecdpsc.dpscdep = tecdep.depnum
>order by tecdpsc.dpscdep, tecdpsc.dpscscal

Can you show the entire code of the event, not just the query?

I don't think that you need a join in this query. You will also need to indicate which department in your Where clause:

strsql = "select Number, Name from table " & _
"where department = " & combo1.text & _
" order by number, name"