Office中国论坛/Access中国论坛

标题: 查询时总是会弹出一个参数输入框，怎么去掉？ [打印本页]

作者: yhcs 时间: 2008-2-19 15:24
标题: 查询时总是会弹出一个参数输入框，怎么去掉？
我自己做了一个查询输入界面，有大概10个查询条件项，要求任何一个项都可以有值，也可以没有值。
如果都没有值，就列出所有记录。如果有值，则按多条件来查询。
其中查询部分的判断条件如下：

Private Function slfStartFilter() 'test
Dim cnt As Integer
cnt = 0

If Me.机种名 <> "" Then
      srhKey = "[机种名] like '" & Me.机种名 & "'"
      cnt = cnt + 1
End If

If Me.机种No <> "" Then
      If cnt > 0 Then srhKey = srhKey & " and "
      srhKey = srhKey & "[机种No] like '" & Me.机种No & "'"
      cnt = cnt + 1
End If

If Me.YXJ_No <> "" Then
      If cnt > 0 Then srhKey = srhKey & " and "
      srhKey = srhKey & "[YXJ_No] like '" & Me.YXJ_No & "'"
      cnt = cnt + 1
End If

If Me.配置123 <> "" Then
      If cnt > 0 Then srhKey = srhKey & " and "
      srhKey = srhKey & "[配置123] like '" & Me.配置123 & "'"
      cnt = cnt + 1
End If

DoCmd.OpenForm "F_配给清单"
End Function
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
以上机种名，机种No，YXJ_No，配置123 是数据库中的字段，也是查询项中的控件名，问题在于当YXJ_No和配置123有值时的查询，就会弹出一个参数输入框，其他的不会，请问怎么回事？

作者: yhcs 时间: 2008-2-19 16:03
在线等，请帮忙

作者: t小宝 时间: 2008-2-19 16:08
看得有点眼花，你不如发个例子上来

作者: yhcs 时间: 2008-2-19 16:53
我找到问题了，是因为涉及到2个不同的数据库，有些字段是数据库a的，有些是b的

作者: yhcs 时间: 2008-2-19 17:32
已经搞定，是我的字段名写错了，呵呵！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)