printpreviewdialog 打印预览

zghas 2014-11-20 08:54:02
代码均在Form1
1)
private sub document_printpage( )
判断e.hasmorepage实现分页
end sub

2)
dim p_view as new printpreviewdialog
绑定document_printpage
实现预览

3)问题来了
1、点击Form1上的,打印预览,能正常分页预览(共2页)。点击预览里的打印,能正常打印分页。
2、关闭预览dialog,再次点击打印预览,就不能分页了,两页内容重叠在一起。
3、如此反复关闭、预览就不断叠加,颜色越来越深。
目前我的做法只能把document_printpage写入别的窗体,预览一次调用一次,预览结束,关闭窗体,那么一切就重来了。肯定可以。
一直没找什么原因,求大神解答,感激不尽!
...全文
229 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
魔王-T 2018-10-10
  • 打赏
  • 举报
回复
PrintPreviewDialog1.Size = New Size(500, 500) PrintPreviewDialog1.AutoSizeMode = AutoSizeMode.GrowAndShrink PrintPreviewDialog1.ShowDialog() 试一试这个吧
zghas 2014-11-20
  • 打赏
  • 举报
回复
按道理,两页叠加,说明是有进行分页的,不然就不会叠加,而是接在尾巴。只是没有分到两个界面,不明白~~
zghas 2014-11-20
  • 打赏
  • 举报
回复
问题应该不是在printpreviewdialog,而是在ducment_printpage,或者Beginprint,Endprint里需要有什么清空缓存之类的操作。 printpreviewdialog.showdialog() 后面加 printpreviewdialog.close printpreviewdialog.dispose 都没用。

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧