以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 未声明名称? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30473) |
-- 作者:wqb1102 -- 发布时间:2013/3/28 11:57:00 -- 未声明名称? Dim txt As String = e.Form.DropDownBox.Text Dim tbl As Table = Tables("客户录入_Table1") If txt = "" Then Tables("客户录入_Table1").Filter = "" Else txt = "\'*" & txt & "*\'" tbl.Filter = "客户Like " & txt & " Or 区域经理Like " & txt & " & " Or 手机Like " & txt Or 联系人Like " & txt Or 电话Like" & txt End If e.Form.DropDownBox.Select()
\'将输入焦点返回下拉列表框 从指南中复制后,修改:tbl.Filter = "客户ID Like " & txt & " Or 公司名称Like " & txt & " Or 地址Like" & txt & " Or 联系人Like " & txt 为: tbl.Filter = "客户Like " & txt & " Or 区域经理Like " & txt & " & " Or 手机Like " & txt Or 联系人Like " & txt Or 电话Like" & txt 提示:未声明名称:手机Like 等,但我看前面的代码中没有声明名称的字段。 |
-- 作者:wqb1102 -- 发布时间:2013/3/28 12:24:00 -- 加空格后,还是:未声明名称:手机 (我还特意从字段中引用) 另:如果在客户表中已经确定每个客户所属的县,上面公式中我想根据已录入的县,先选出此县所有的客户,要如何修改上面的代码? 多谢!
|
-- 作者:jspta -- 发布时间:2013/3/28 12:26:00 -- 请加上双引号,这是一个字符串,不是变量 |
-- 作者:wqb1102 -- 发布时间:2013/3/28 12:40:00 -- 是我修改时多了个联接符,已解决第一个问题。多谢! 另:如果在客户表中已经确定每个客户所属的县,上面公式中我想根据已录入的县,先选出此县所有的客户,要如何修改上面的代码?
|