Foxtable(狐表)用户栏目专家坐堂 → 怎样查询全部内容


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

主题:怎样查询全部内容

帅哥哟,离线,有人找我吗?
kjkui
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:18 积分:196 威望:0 精华:0 注册:2016/9/26 15:20:00
怎样查询全部内容  发帖心情 Post By:2016/9/30 9:36:00 [显示全部帖子]

一个下拉框,里面的值有一个“全部”,选择全部,则查询表全部内容
Dim xz As WinForm.ComboBox = e.Form.Controls("cmbEmployee")
If xz.value = "全部"
        Tables("订单管理").ApplyFilter = False
               Tables("订单管理").Filter = Filter
        
    End If

怎样做???



 回到顶部
帅哥哟,离线,有人找我吗?
kjkui
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:18 积分:196 威望:0 精华:0 注册:2016/9/26 15:20:00
  发帖心情 Post By:2016/9/30 10:02:00 [显示全部帖子]

如果选择下拉框其他的值(具体的如北、南...),按里面的值查询,怎么写
With e.Form.Controls("cmbEmployee")
  If .Value IsNot Nothing Then
           If Filter >"" Then
               Filter = Filter & " And "
          End If
          Filter = Filter & "区域 = '" & .Value & "'"
         End If
End With
写了这个,就不能与上面的查询“全部”共用了

 回到顶部