查询求助..

yangruihao

点击查询按钮后，弹出这样的错误.代码看不大懂，不知道哪错 了

roych

用筛选语句试试?

1.     Dim strSQL   As String
   
2.     If Len(Me.Combo0) > 0 Then
   
3.         strSQL = "供应商 like '*" & Trim(Nz(Me.Combo0.Value, "")) & "*' "
   
4.         Me.采购单表头_子窗体.Form.Filter = strSQL
   
5.         Me.采购单表头_子窗体.Form.FilterOn = True
   
6.     Else
   
7.         strSQL = ""
   
8.         Me.采购单表头_子窗体.Form.FilterOn = False
   
9.     End If
   
10.     Me.采购单表头_子窗体.Form.Requery

复制代码

yangruihao

layaman_999 发表于 2012-8-26 22:36
请删除最后那句requery
没用，平白无故多次查询

删了那句也是没用..我已经打算重新做了，唉

layaman_999

请删除最后那句requery
没用，平白无故多次查询

yangruihao

todaynew 发表于 2012-8-26 21:22
搞不明白你要干什么？
子窗体本来的数据源为采购单明细，为什么又在筛选中改为了采购商表头？

其实我是想通过“供应商”，显示找出 采购单表头子窗体 的“单号”“日期”“备注”。再通过点击  采购单表头子窗体  的“单号”，在另一个子窗体——采购单明细中显示出明细。

之前见过有老师做出类似这样的递进查询，所以我就想试一下

todaynew

yangruihao 发表于 2012-8-26 14:40
按你的改了，还是没用，麻烦你帮我看一下吧.. 好人啊！

搞不明白你要干什么？
子窗体本来的数据源为采购单明细，为什么又在筛选中改为了采购商表头？

yangruihao

{:soso_e178:}

yangruihao

帮帮忙啊，各位

yangruihao

风中漫步 发表于 2012-8-26 14:33
采购商表头中有供应商字段吗?

我传上去了，在评论里面

yangruihao

风中漫步 发表于 2012-8-26 14:33
采购商表头中有供应商字段吗?

我传上去了，在评论里面