Foxtable(狐表) → 用户栏目 → 专家坐堂 → 求个实现方法！


  共有3132人关注过本帖树形打印复制链接

主题：求个实现方法！
帅哥哟，离线，有人找我吗？
coolbhb
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：60 积分：490 威望：0 精华：0 注册：2014/7/11 9:16:00 		求个实现方法！  发帖心情 Post By：2014/8/21 14:01:00 [显示全部帖子]

如下图，上面圈的地方实现下面表的查询和筛选，按钮代码写完了，现在只有清空和撤销的好使，不能正常查询。

图片点击可在新窗口打开查看此主题相关图片如下：捕获.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
coolbhb
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：60 积分：490 威望：0 精华：0 注册：2014/7/11 9:16:00 		  发帖心情 Post By：2014/8/21 14:17:00 [显示全部帖子]

Forms("收费").Controls("loudaima").BindingField = "客户信息.楼代码"

是在窗口的Afterload 事件里吗？还是没有效果。

下面是查询按钮的代码
Dim Filter1 As String
With e.Form.Controls("loudaima")
    If .Value IsNot Nothing Then
        Filter1 = "楼代码 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("xiaoqu")
    If .Value IsNot Nothing Then
        If Filter1 > "" Then
            Filter1 = Filter1 & " And "
        End If
        Filter1 = Filter1 & "小区 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("louhao")
    If .Value IsNot Nothing Then
        If Filter1 > "" Then
            Filter1 = Filter1 & " And "
        End If
        Filter1 = Filter1 & "楼号 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("danyuan")
    If .Value IsNot Nothing Then
        If Filter1 > "" Then
            Filter1 = Filter1 & " And "
        End If
        Filter1 = Filter1 & "单元 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("cengshu")
    If .Value IsNot Nothing Then
        If Filter1 > "" Then
            Filter1 = Filter1 & " And "
        End If
        Filter1 = Filter1 & "层数 = '" & .Value & "'"
    End If
End With
With e.Form.Controls("shihao")
    If .Value IsNot Nothing Then
        If Filter1 > "" Then
            Filter1 = Filter1 & " And "
        End If
        Filter1 = Filter1 & "室号 = '" & .Value & "'"
    End If
End With
[此贴子已经被作者于2014-8-21 14:20:30编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
coolbhb
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：60 积分：490 威望：0 精华：0 注册：2014/7/11 9:16:00 		  发帖心情 Post By：2014/8/21 15:22:00 [显示全部帖子]

甜老师又出了个新问题，现在只要在筛选树双击的时候，上边文本框会自动填入数据而且数据还没有用，这个问题如何解决。

 回到顶部
帅哥哟，离线，有人找我吗？
coolbhb
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：60 积分：490 威望：0 精华：0 注册：2014/7/11 9:16:00 		  发帖心情 Post By：2014/8/21 15:25:00 [显示全部帖子]

那不绑定又如何用上边文本框查询筛选。。。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询