[求助]如何实现文字的复制？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何实现文字的复制？

共有2417人关注过本帖树形打印复制链接主题：[求助]如何实现文字的复制？

bailang121

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

等级：幼狐帖子：140 积分：1242 威望：0 精华：0 注册：2015/4/10 15:44:00

[求助]如何实现文字的复制？ 发帖心情

Post By：2015/10/14 15:13:00 [显示全部帖子]

Dim jj As String = Tables("表A").Rows(0)("标题")

Sendkeys.Send(jj)

以上代码好像是可以复制表A标题的内容，然后传递给sendkeys的方式输入~

那么请问什么代码能把sendkeys的动作修改成模拟粘贴这个动作吗？因为sendkeys有时候在某种情况下会出错！我想读取表A的内容~ 然后粘贴

bailang121

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

等级：幼狐帖子：140 积分：1242 威望：0 精华：0 注册：2015/4/10 15:44:00

Post By：2015/10/14 15:34:00 [显示全部帖子]

不对啊老大~ 您这个方式我之前就看了~ 这个剪贴板处理~ 只能传递数据~ 我的意思是~怎样实现粘贴或者说是 ctrl+V 这个动作

比如

Case 103 '''''快捷键F1

Dim jj As String = Tables("表A").Rows(0)("标题")

Sendkeys.Send(jj)

之前是这样用快捷键传递sendkeys这个动作的~ 那么如何用快捷键传递 ctrl+v 这个动作呢？

就是想模拟 ctrl+v

bailang121

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

等级：幼狐帖子：140 积分：1242 威望：0 精华：0 注册：2015/4/10 15:44:00

Post By：2015/10/14 15:48:00 [显示全部帖子]

噢噢~~~~Sendkeys.Send("^V") 解决了~！ 3Q！~

主题：[求助]如何实现文字的复制？