求老师帮忙完善查询

老鬼公公_31 · 发表于 2018-9-21 17:05

通过ComboBox1,ComboBox2,ComboBox3和TextBox1查找数据库内容，查找的资料不全，求老师帮帮完善

老鬼公公_31 · 发表于 2018-9-21 19:53

有人帮忙吗

xiaoqiang17 · 发表于 2018-9-21 22:15

试一下把模糊查找＿Click()下判断语句改成下面的。

If InStr(strSearchText1, IIf(UCase(ComboBox1) = "", " ", UCase(ComboBox1))) Or InStr(strSearchText2, IIf(UCase(ComboBox2) = "", " ", UCase(ComboBox2))) Or InStr(strSearchText3, IIf(UCase(ComboBox3) = "", " ", UCase(ComboBox3))) Or InStr(strSearchText4, IIf(UCase(TextBox1) = "", " ", UCase(TextBox1))) Then

复制代码

老鬼公公_31 · 发表于 2018-9-22 00:19

xiaoqiang17 发表于 2018-9-21 22:15
试一下把模糊查找＿Click()下判断语句改成下面的。

晚点试试，谢谢

zpy2 · 发表于 2018-9-22 08:08

老鬼公公_31 发表于 2018-9-21 19:53
有人帮忙吗

查询有权限的用Excel安全和多用户比较麻烦。

老鬼公公_31 · 发表于 2018-9-22 21:28

xiaoqiang17 发表于 2018-9-21 22:15
试一下把模糊查找＿Click()下判断语句改成下面的。

好像不行哦，Cb1是查找分类，Cb2查找年度，Cb3查找保管期限，Tb1查找后面任意字段

xiaoqiang17 · 发表于 2018-9-22 22:11

老鬼公公_31 发表于 2018-9-22 21:28
好像不行哦，Cb1是查找分类，Cb2查找年度，Cb3查找保管期限，Tb1查找后面任意字段

是查找不到内容，还是达不到你要求呢？
你的代码是不能查找，改了后CB1，CB2，CB3，TB1，任意填一个到全部都是可以模糊查找的。

老鬼公公_31 · 发表于 2018-9-22 23:31

xiaoqiang17 发表于 2018-9-22 22:11
是查找不到内容，还是达不到你要求呢？
你的代码是不能查找，改了后CB1，CB2，CB3，TB1，任意填一个到全 ...

CB1，CB2，CB3，TB1好比是4个条件，为空的话就是全部

老鬼公公_31 · 发表于 2018-9-22 23:52

是要满足CB1，CB2，CB3，TB1这4个条件

xiaoqiang17 · 发表于 2018-9-23 18:28

老鬼公公_31 发表于 2018-9-22 23:31
CB1，CB2，CB3，TB1好比是4个条件，为空的话就是全部

试一下把模糊查找＿Click()下判断语句改成下面的。

If InStr(strSearchText1, UCase(ComboBox1)) > 0 And InStr(strSearchText2, UCase(ComboBox2)) > 0 And InStr(strSearchText3, UCase(ComboBox3)) > 0 And InStr(strSearchText4, UCase(TextBox1)) > 0 Then

复制代码

		自动登录	找回密码
密码			免费注册

[求助] 求老师帮忙完善查询