Office中国论坛/Access中国论坛

标题: 异化《图书例》（多条件查询） [打印本页]

作者: 浩雨 时间: 2006-11-9 18:15
标题: 异化《图书例》（多条件查询）
供参考：[attach]21414[/attach]

作者: lupo 时间: 2006-11-10 17:22
不错，收藏。和以前那个相比，精简了代码。

不过以前那个比较适合教学，容易看懂。

作者: 浩雨 时间: 2006-11-10 20:51
本例：

1、主要采用“遍历”方法访问窗体上所有的控件，利用Control的ControlType 属性来区分所需的控件。当窗体上有多个控件需要访问时，建议用“遍历”的方法。

2、检测筛选条件变量是否为“空”，决定“and”的写入。

            If Len(strBoxWhere) Then
                  strBoxWhere = strBoxWhere & " and " & CtlName & strSing & strMark & ctl & strMark
            Else
                  strBoxWhere = CtlName & strSing & strMark & ctl & strMark
            End If
3、利用共性，使用变量。如，利用控件名的长短来区分“=”与“>=”或“<=”；利用控件名的尾字符“1”和“2”来区分“>=”和“<=”。

另外表的链接也改动过。

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