Foxtable(狐表)用户栏目专家坐堂 → 如何 调用WINDOWS的 CTRL+C功能


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

主题:如何 调用WINDOWS的 CTRL+C功能

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


加好友 发短信
等级:三尾狐 帖子:688 积分:4903 威望:0 精华:0 注册:2013/10/27 17:14:00
如何 调用WINDOWS的 CTRL+C功能  发帖心情 Post By:2015/7/21 12:55:00 [只看该作者]

如何 调用WINDOWS的 CTRL+C功能

 

模拟按CTRL+C功能

将当前光标所选择的内容复制到剪贴板


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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2015/7/21 13:15:00 [只看该作者]

这里行吗?

 http://www.foxtable.com/help/topics/2069.htm


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


加好友 发短信
等级:三尾狐 帖子:688 积分:4903 威望:0 精华:0 注册:2013/10/27 17:14:00
  发帖心情 Post By:2015/7/21 13:33:00 [只看该作者]

这个不行

这个只能复制特定控件,里 的全部内容

 

而CTRL+C 复制是不管控件,不管内容多少的。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/21 14:30:00 [只看该作者]

 做不到,你只能循环ctrl + C

 

 做个任务计划

 

'MyTimers("计划1").Enabled = False
Sendkeys.SendWait("^(C)")


 

 需要的时候,写代码,需要的时候,就开启

 

MyTimers("计划1").Enabled = True

 

 不需要就关闭

 

MyTimers("计划1").Enabled = False

[此贴子已经被作者于2015/7/21 14:30:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/21 14:35:00 [只看该作者]

 还不如直接说要做什么

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


加好友 发短信
等级:三尾狐 帖子:688 积分:4903 威望:0 精华:0 注册:2013/10/27 17:14:00
  发帖心情 Post By:2015/7/21 15:56:00 [只看该作者]

目标 自制制作 一个 代码知识 管理窗口 取代官方的代码管理窗口

 

其它的都做好了

 

我用ALT+S打开自己的代码管理窗口

 

要加一个功能就最好了

 

按ALT+S时,如果当前状态选择了 代码,则复制选择的代码剪贴板,打开我的窗口,将复制的内容直接新增到代码CODE表中。

 

现在都做好了

 

当前操作是:先选定要保存的代码(有时仅代码编辑窗口中的部份代码)———按CTRL+C复制——按ALT+S打开自制代码管理窗口——保存。

 

如果按ALT+S时能先 执行CTRL+C复制内容,就可以少按一次组合键了。

 

先选定要保存的代码(有时仅代码编辑窗口中的部份代码)——按ALT+S打开自制代码管理窗口——保存。

[此贴子已经被作者于2015/7/21 15:56:44编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/21 16:00:00 [只看该作者]

 做不到


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


加好友 发短信
等级:三尾狐 帖子:688 积分:4903 威望:0 精华:0 注册:2013/10/27 17:14:00
  发帖心情 Post By:2015/7/22 22:25:00 [只看该作者]

这个怎么就不行了呢

Dim tt As String = e.sender.SelectedText

 

但无法获取控件名称

 

那对当前或所有窗口的控件进行遍历

判断e.sender.SelectedText 的值,如果字数大于0 就退出,将值给tt如何写代码 呢


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/22 22:27:00 [只看该作者]

 只能遍历forms窗口,代码窗口不能遍历。

 回到顶部