Foxtable(狐表)用户栏目专家坐堂 → 下拉窗口根据条件模糊查找


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

主题:下拉窗口根据条件模糊查找

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/16 8:35:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/23 9:37:00 [显示全部帖子]

加一个条件:标准使用状态 <> '停止使用'

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/23 9:51:00 [显示全部帖子]

 If txt = "" Then
      tbl.Filter = "标准使用状态 <> '停止使用'"
 Else
     txt = "'%" & txt & "%'"
     tbl.Filter = "标准使用状态 <> '停止使用' and (大类 Like " & txt & " Or 中类 Like " & txt & " Or 小类 Like " & txt & "Or 任务标准描述 Like " & txt & " Or 标准用时 Like " & txt & " Or 标准人数 Like " & txt & " Or 标准工价 Like " & txt & " Or 标准编码 Like " & txt & "  Or 任务模版 Like " & txt & "  Or 任务描述编码 Like " & txt & “)”
 End If

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/23 10:27:00 [显示全部帖子]

不可能,除非数据有问题。

如果只有2种状态,改为这样试试:标准使用状态 = '使用中'

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/23 12:16:00 [显示全部帖子]

Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then '如果下拉窗口已经打开
    Dim tbl As Table = Tables("任务标准库_Table1")
    Dim filter As String = "标准使用状态 <> '停止使用'" 
    If drp.Text > "" Then '如果内容为空
        Dim txt As String = "'%" & drp.Text & "%'"
        filter = filter & " and 任务标准描述  Like " & txt 
    End If
    tbl.DataTable.LoadFilter = Filter  
    tbl.DataTable.Load
End If

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


加好友 发短信
等级:超级版主 帖子:107813 积分:548416 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/3 21:48:00 [显示全部帖子]


 回到顶部