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

此主题相关图片如下：qq截图20161031112130.png

'区域快照功能(与标题的层数有关)

With CurrentTable

Dim n As Integer = .HeaderRows

Dim img As Image = .Grid.CreateImage(.TopRow + n, .LeftCol+1, .BottomRow + n, .RightCol+1)

Dim FileName As String = ProjectPath & "Attachments\JP_Images\" & Format(Date.Now(),"yyyyMMdd.HHmmss") & ".png"

img.Save(FileName) '指定的保存路径必须已经存在.否则会报错.

Dim Proc As New Process

Proc.File = FileName

Proc.Start()

End With

[此贴子已经被作者于2016/10/31 11:22:17编辑过]

主题：[求助]