请教关于下由一个拉列值创建一个下拉列表值问题

noami

各位老师请指教：
       1、附件中在”领料“窗体里我想用“工程部位”的下拉值来生成“分项工程”下拉列表可否，其值由“路基工程"表提供，在“路基工程"中工程部位虽然字段值相同，但是分项名称不同，我想实现上面的方法，请各位老师指教！

      2、在”领料“窗体里我在主体里选择时，页眉第一行”工程部位“地方都为空值，我想先选定”工程部位“的值固定不变只让主体的内容变化不知用什么方法实现，也请各位老师指教！

      3、在添加打印按钮时内容只有一页，可打印出来有3页，其位置找不到，不知如何设置的

noami

请各位老师指教，我想在附件中按班组名、库管员、工程部位实现查询功能，请问怎么实现，谢谢！

noami

请各位老师指教哈，谢谢！

noami

Private Sub 工程部位_AfterUpdate()
我按老师的提示编写：
Dim strsql As String

strsql = "select id,细目名称 from 路基工程 where 路基工程.工程部位 = '" & Me.工程部位 & "'"
Me.分项工程.RowSource = strsql
End Sub
为什么总是报错，提示“方法和成员未找到”，按帮助也没有解决方法，请老师指教！