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

搜索历史帖子，如下命令可以打印图片

Dim piv As WinForm.PictureViewer = e.Form.Controls("PictureViewer3")

If piv.SelectedItem IsNot Nothing Then

Dim doc As New PrintDoc '定义一个报表对象

Dim rm As New prt.RenderImage '定义一个图片对象

rm.Image = getImage(piv.SelectedItem)

rm.Style.Borders.All = New prt.Linedef(1, Color.Red) '设置边框

doc.Body.Children.Add(rm) '将图片对象加入报表

Doc.Preview() '预览

End If

提示 “e” 是 “private”，因此它在此上下文中不可访问

主题：PictureViewer 图片打印问题