设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 882|回复: 5
打印 上一主题 下一主题

[Access本身] [已解决]请教一个下拉框的数据代码.

[复制链接]
跳转到指定楼层
1#
发表于 2009-5-11 11:25:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 g7235723 于 2009-5-11 15:02 编辑

想法是这样:
将一个下拉框和一个"数量"参数关联.
当"数量"=1,
下拉框的值是1.
当"数量"=2,
下拉框的值是1,2.
当"数量"=3,
下拉框的值是1,2,3.
...

请教一下该如何写VBA代码.
谢谢关注.
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2009-5-11 12:00:24 | 只看该作者
Select Case  QTY
          Case 1
          youcomobox.value="1"
          case 2
          youcomobox.value="1,2"
          .....
End select

如果你的数量有很多种,不定,考虑用个FOR 循环构建字符串再赋值给下拉框.
3#
 楼主| 发表于 2009-5-11 14:17:46 | 只看该作者
对不起,可能是我说错了
当"数量"=3,
我指得是下拉框的第一行的值是1,
第二行的值是2,
第三行的值是3...
4#
发表于 2009-5-11 14:18:33 | 只看该作者
for i=1 to qty
combox=combox & I & ","
next
5#
 楼主| 发表于 2009-5-11 14:35:13 | 只看该作者
本帖最后由 g7235723 于 2009-5-11 14:37 编辑

我试了下,Me.下拉框.RowSource = "1;2;3"
但报告出错.
"...记录源"1;2;3"不存在..."
是语法问题吗?
6#
 楼主| 发表于 2009-5-11 15:02:01 | 只看该作者
找到错误原因了,要把"下拉框"的"行来源类型"改成:"值列表",就对了.

谢谢大家帮助.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-22 05:07 , Processed in 0.138083 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表