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

问题1. table1中（房间号）列使用下拉窗口，打开的窗口里面的table2复选框的值怎么存回table1的这个（房间号）列？

问题2.   弹出下拉窗口时，table2中有 table1中的（房间号）列里的值 的行前面的复选框是选中状态的。

第2个问题解决了。

'以下是把原有的房间号的行的复选框勾选上.
Dim zcl As String= Tables("userb.zclxingcheng").current("房间号")
Dim zcls As String =zcl.Replace(" ","") 
For Each r As Row In Tables("选房窗口_table1").Rows
    If zcls.Contains(r("房间号"))    Then
        r.Checked = True
    End If
Next

现在还缺第一个问题的代码， 就是怎么把选中的复选框所在行的房间号码的集合，写回到Tables("userb.zclxingcheng").current("房间号")