重发 请问在列表中我引入的字段名（字符串），出来的却是id号，请各位指教

noami

在noami数据库中窗体“领料”中工程部位下拉列表值确定“分项工程”列表值，当选择工程部位值时，分项工程值为空
查看代码时发现在分项工程名字中所查询的是工程部位的id号而不是工程部位的值来查询判定的

请问怎么解决，谢谢！

Private Sub 工程部位_AfterUpdate()

Dim strsql As String

strsql = "select * from 路基工程 where 路基工程.工程部位  = '" & Me.工程部位 & "'"
Me.分项工程.RowSource = strsql
End Sub


Private Sub 工程部位_Click()
Me.工程部位.Dropdown
End Sub

roych

把里面的*改为相应的字段试试看？
例如：
Private Sub 工程部位_AfterUpdate()

Dim strsql As String

strsql = "select 分项工程 from 路基工程 where 路基工程.工程部位  = '" & Me.工程部位 & "'"
Me.分项工程.RowSource = strsql
End Sub