table1中房间号列使用下拉窗口，里面的table2复选框的值怎么存回table1的这个房间号列？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → table1中房间号列使用下拉窗口，里面的table2复选框的值怎么存回table1的这个房间号列？

共有3637人关注过本帖树形打印复制链接主题：table1中房间号列使用下拉窗口，里面的table2复选框的值怎么存回table1的这个房间号列？

有点甜

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/8/18 20:28:00 [显示全部帖子]

可以做，但需要写简单的代码。

1、遍历table2所有的行，看行是否被选中。选中就往房间号添加数据。

2、在table2中查找对应的行，勾选。

你上传一个例子吧，楼主。

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/8/18 20:59:00 [显示全部帖子]

第一个问题，参考

Dim str As String = ""

For Each r As Row In Table("选房窗口_table1").Rows

If r.Checked Then

str += r("房间号") + ","

End If

Tables("userb.zclxingcheng").current("房间号") = str.Trim(",")

有点甜

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2013/8/18 21:40:00 [显示全部帖子]

这样写就行了

Forms("xxxx").DropDownBox.Value = "123,12"

或者

e.Form.DropDownBox.Value = "123,12"

主题：table1中房间号列使用下拉窗口，里面的table2复选框的值怎么存回table1的这个房间号列？