Foxtable(狐表)用户栏目专家坐堂 → [求助]模糊地址查询代码


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

主题:[求助]模糊地址查询代码

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


加好友 发短信
等级:婴狐 帖子:46 积分:577 威望:0 精华:0 注册:2008/9/1 8:18:00
[求助]模糊地址查询代码  发帖心情 Post By:2012/3/2 15:32:00 [只看该作者]

请问:窗口上模糊地址查询代码如何写?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:电话薄.table

[此贴子已经被作者于2012-3-2 16:28:07编辑过]

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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/3/2 15:38:00 [只看该作者]


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


加好友 发短信
等级:婴狐 帖子:46 积分:577 威望:0 精华:0 注册:2008/9/1 8:18:00
  发帖心情 Post By:2012/3/2 16:29:00 [只看该作者]

请帮写一下。

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


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/3/2 17:55:00 [只看该作者]

查询按钮的代码:

 

Dim val As String  = e.Form.Controls("ComboBox1").Value
If val > "" Then
  Tables("表A").Filter = "地址 Like '*" & val & "*'"
End If


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


加好友 发短信
等级:婴狐 帖子:46 积分:577 威望:0 精华:0 注册:2008/9/1 8:18:00
  发帖心情 Post By:2012/3/2 18:10:00 [只看该作者]

谢谢!

 回到顶部