Foxtable(狐表)用户栏目专家坐堂 → 甜老师,怎么把某一列的内容添加到剪贴板


  共有1611人关注过本帖树形打印复制链接

主题:甜老师,怎么把某一列的内容添加到剪贴板

帅哥哟,离线,有人找我吗?
cyrollin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
甜老师,怎么把某一列的内容添加到剪贴板  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2018/12/19 17:29:00 [只看该作者]

图片点击可在新窗口打开查看 谢谢, ! 晚上给您加一个鸡腿,爱吃吗?



 回到顶部