2011-10-15 19:08 PrintPreviewControl 打印阅览 重绘刷新阅览数据今日做打印阅览使用了PrintPreviewControl1控件,在同一个页面中使用的阅览,如果是打开过一次阅览了调用第二次的时候就不会刷新新的内容到阅览界面了,所以当时我通过调试代码发现有可能需要在阅览按钮的事件中去调用 Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.DrawString("病理科诊断报告", New Font("宋体", 40, FontStyle.Regular), Brushes.Black, 220, 80)
但是调用它的时候我按照vb6的习惯使用了vb6中的call语句,这个传递参数有些问题所以我一直在查找如何call其它事件找了很久未果。 ' Dim e As New System.Drawing.Printing.PrintPageEventArgs
Call Me.PrintDocument1_PrintPage(Me.PrintDocument1, e)
后来问网友网友提醒了我如果只是在单页面调用打印阅览就会涉及到控件的内容刷新,要我去查找 PrintPreviewControl1的打印阅览刷新。找了很久还真让我找到了后来一句代码解决了刷新问题。如下:阅览前调用它即可。'///重新刷新画布///
PrintPreviewControl1.InvalidatePreview()付原出处。