以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  【已解决】[求助]以前看过一帖子,讲的是狐表像Excel复制单元格粘贴称图片一样截图,请问谁知道是哪个帖子或者代码不?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=131695)

--  作者:zto001
--  发布时间:2019/3/4 17:56:00
--  【已解决】[求助]以前看过一帖子,讲的是狐表像Excel复制单元格粘贴称图片一样截图,请问谁知道是哪个帖子或者代码不?
[求助]以前看过一帖子,讲的是狐表像Excel复制单元格粘贴称图片一样截图,请问谁知道是哪个帖子或者代码不?
[此贴子已经被作者于2019/3/5 15:44:17编辑过]

--  作者:zto001
--  发布时间:2019/3/4 17:57:00
--  
不用了,我找到了
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=31163

--  作者:zto001
--  发布时间:2019/3/5 9:00:00
--  
还想问问,他这个代码是直接保存文件的,我不需要保存文件,需要像qq截图一样复制图片粘贴在qq就直接变成了图片,可以吗?
--  作者:有点甜
--  发布时间:2019/3/5 9:13:00
--  
\'区域快照功能
Dim img As Image = CurrentTable.grid.CreateImage(CurrentTable.TopRow+1, CurrentTable.LeftCol+1, CurrentTable.BottomRow+1, CurrentTable.RightCol+1)
img.save(projectpath & "test.jpg")
ClipBoard.SetImage(getimage(projectpath & "test.jpg"))