设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

由文本框改变列表框的内容

1970-1-1 08:00| 发布者: 佚名| 查看: 1494| 评论: 0

private sub 文本框名_change()
    dim txtTemp as string
    txtTemp=文本框名.text
    me.列表框名.rowsource="select 字段名 from 表名 where 字段 like '*"& txtTemp &"*'"    '此句为文本字段全模糊查询
    me.列表框名.requery
end sub


最新评论

相关分类

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-4-4 15:47 , Processed in 0.071169 second(s), 16 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部