Office中国论坛/Access中国论坛

标题: 请教一个VBA问题 [打印本页]

作者: a30088 时间: 2015-7-11 15:35
标题: 请教一个VBA问题
本帖最后由 a30088 于 2015-7-11 15:40 编辑

下面的SQL语句用组合框VBA代码如何写成

SELECT qrykhb.kID, qrykhb.kh, qrykhb.lxmc, qrykhb.lxdh
FROM qrykhb
WHERE (((qrykhb.lxmc)="销售商" Or (qrykhb.lxmc)="加工厂")); 如何把这句加上去.

写成如下
Me.kID.RowSource =
样例: Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb ORDER BY kh"

作者: yanwei82123300 时间: 2015-7-11 15:42
kID控件属性里面选择更新后或者加载数据，将Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb ORDER BY kh"放进去，ok

作者: a30088 时间: 2015-7-11 15:49
本帖最后由 a30088 于 2015-7-11 15:50 编辑

yanwei82123300 发表于 2015-7-11 15:42
kID控件属性里面选择更新后或者加载数据，将Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb OR ...

谢谢,我是说把后面这句"WHERE (((qrykhb.lxmc)="销售商" Or (qrykhb.lxmc)="加工厂")); "加到" SELECT KID,kh,lxmc,lxdh FROM qrykhb ORDER BY kh",怎么写VB代码.

作者: roych 时间: 2015-7-11 15:56
本帖最后由 roych 于 2015-7-11 16:02 编辑

order by 是写在后面的。一般应该这样写：
Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb & " WHERE (((lxmc)='销售商' Or (lxmc)='加工厂')) ORDER BY kh"【注意：这里把销售商、加工厂改为单引号了】如果是变量的话，可以这样写【这里去掉了小括号】：
Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb " & " WHERE lxmc='" & me.销售商 & " Or lxmc='" & me.加工厂 &"' ORDER BY kh"
me.销售商和 me.加工厂对应窗体中的控件。

作者: a30088 时间: 2015-7-11 16:13
本帖最后由 a30088 于 2015-7-11 16:50 编辑

roych 发表于 2015-7-11 15:56
order by 是写在后面的。一般应该这样写：
Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb & ...

谢谢!按以上,出错?file:///C:\Users\Administrator\AppData\Roaming\Tencent\Users\906366881\QQ\WinTemp\RichOle\]LQCX779DZ72J%A1`VP7OYD.png

作者: roych 时间: 2015-7-11 16:26

a30088 发表于 2015-7-11 16:13
谢谢!按以上,出错?

不好意思，第一句漏了个引号，应该是：
Me.kID.RowSource = " SELECT KID,kh,lxmc,lxdh FROM qrykhb " & " WHERE (((lxmc)='销售商' Or (lxmc)='加工厂')) ORDER BY kh"

作者: a30088 时间: 2015-7-11 16:44
谢谢roych的指点,谢谢!

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)