以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于获取某个行的所有列内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=120967)

--  作者:做自己
--  发布时间:2018/6/27 10:31:00
--  关于获取某个行的所有列内容
现在又一个表,列分别是名称,颜色1,颜色2,颜色3
行有名称1,红色,白色,蓝色。我想获取这个表名称为名称1的,所有颜色,放到另一个Table的某一列,该怎么弄?就是把某个Table的所有列放到另一个Table的下拉里面

--  作者:有点甜
--  发布时间:2018/6/27 10:44:00
--  

Dim dr As DataRow = DataTables("表a").find("名称=\'名称1\'")

Dim str As String = dr("颜色1") & "|" & dr("颜色2") & "|" & dr("颜色3")

 

Tables("表B").Cols("第一列").Combolist = str