以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  甜老师，怎么把某一列的内容添加到剪贴板  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=128998)
--  作者：cyrollin
--  发布时间：2018/12/19 17:19:00
--  甜老师，怎么把某一列的内容添加到剪贴板

SetText
将字符串添加到剪贴板中。

示例

Dim s As String = "我喜欢Foxtable"
ClipBoard.SetText(s)


帮助里面只有这个，复制字符串。

但怎么把筛选出来的某一列 的全部内容都复制到clipboard呢？

比如我要做一个button, 要获得一个 table的 身份证号列的数据到 clipboard.
一行一个身份证号码，这种格式。

thanks, tian 


[此贴子已经被作者于2018/12/19 17:24:11编辑过]
--  作者：有点甜
--  发布时间：2018/12/19 17:26:00
--  

比如

 

Dim str As String = ""
For Each r As Row In Tables("表A").Rows
    str &= r("第二列") & vbcrlf
Next

ClipBoard.settext(str)
--  作者：cyrollin
--  发布时间：2018/12/19 17:29:00
--  
图片点击可在新窗口打开查看 谢谢， ！ 晚上给您加一个鸡腿，爱吃吗？