form.filter

Fly_麦田

在主窗体上设置了一个组合框Combo6 ，组合框Combo6 的数据来源为distinct查询。
通过主窗体的组合框Combo6选择查询条件,希望能在子窗体child上显示查询结果，可以一直报错。
代码如下:
Private Sub Combo6_AfterUpdate()
Dim strwhere As String
strwhere = "true"
If IsNull(Me.Combo6.Text) = False Then
strwhere = "零件编号=" & Me.Combo6.Text
End If
Me.child.Form.Filter = strwhere
Me.child.Form.FilterOn = True
End Sub

错误信息，提示输入参数值，变成了参数查询

tmtony

"零件编号='" & Me.Combo6.Text & "'"

Fly_麦田

感谢王站，我还想问一下，是不是因为VALUE才变成参数查询的？

tmtony

Me.Combo6.Text  这个 一般改成 Me.Combo6.Value较好

roych

一般建议不必用text或者value属性，因为默认就是里面的值了，而有时候恰恰因为使用这个属性导致因为有空字符串而出现错误。