Msgbox如何显示当前窗口中选择的内容?
日常工作时,我会在下面几种经常性用到的当前激活的窗口中,进行手动选择:1、当前激活窗口是word;
2、是EXCEL;
3、是某浏览器(360为例)的标签;
4、是文本文件;
5、是某聊天窗口如2013的QQ窗口、飞信聊天窗口、MSN聊天窗口;
……
如果我在上述几种激活窗口的情况下,用鼠标选中了某一些文字,能在VB代码中用Msgbox显示出来吗?
如我在360浏览器中的某个标签中选择了“大家好”三个字,那么VB就能用Msgbox得出“大家好”来。
谢谢大家关注!我问过一些老师,他们说可以实现,就是难一点。但我不懂API,也不知道要用什么哪些窗口句柄。有一位前辈说了一个思路:
1.实时获得鼠标所在位置句柄的最父级句柄;
2.根据句柄获得EXENAME,根据EXENAME判断是何种程序;
3.当鼠标被按下左键开时至鼠标释放左键时想句柄发送windwos复制消息或者CTRL+V组合键;
4.通过剪贴板获得被复制的文本然后对其MSGBOX。
我觉得不错,但前面的三步不知道如何做,即不知道引用什么API、如何引用,等等。期望前辈们的具体指点。
第四步我想可以用下面的代码:
Dim 网页格式, 文本内容 As String Set 网页格式 = CreateObject("htmlfile") 网页格式.parentWindow.clipboardData.SetData "text", 中转数据 文本内容 = 网页格式.parentWindow.clipboardData.GetData("text")
[ 本帖最后由 bruly 于 2013-1-7 23:42 编辑 ]