skala preview 设计自己的printpreviewdialog

设计自己的printpreviewdialog  

　　源代码 　　　　Imports System Drawing printing　　Imports System io　　Public Class previewcontrol　　　　Inherits System Windows Forms Form　　　　#Region Windows 窗体设计器生成的代码 　　　　　　Public Sub New()　　　　　　MyBase New()　　　　　　　　 该调用是 Windows 窗体设计器所必需的 　　　　　　InitializeComponent()　　　　　　　　 在 InitializeComponent() 调用之后添加任何初始化　　　　　　End Sub　　　　　　 窗体重写 dispose 以清理组件列表 　　　　Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)　　　　　　If disposing Then　　　　　　　　If Not (ponents Is Nothing) Then　　　　　　　　　　ponents Dispose()　　　　　　　　End If　　　　　　End If　　　　　　MyBase Dispose(disposing)　　　　End Sub　　　　　　 Windows 窗体设计器所必需的　　　　Private ponents As System ComponentModel IContainer　　　　　　 注意: 以下过程是 Windows 窗体设计器所必需的　　　　 可以使用 Windows 窗体设计器修改此过程 　　　　 不要使用代码编辑器修改它 　　　　Friend WithEvents PrintPreviewControl As System Windows Forms PrintPreviewControl　　　　Friend WithEvents printsetup As dbcbutton dbcbutton　　　　Private WithEvents pagesetup As dbcbutton dbcbutton　　　　Friend WithEvents Label As System Windows Forms Label　　　　Friend WithEvents Label As System Windows Forms Label　　　　Friend WithEvents Label As System Windows Forms Label　　　　Friend WithEvents openfile As dbcbutton dbcbutton　　　　Friend WithEvents setfont As dbcbutton dbcbutton　　　　Friend WithEvents printthis As dbcbutton dbcbutton　　　　Friend WithEvents pagecount As System Windows Forms NumericUpDown　　　　Friend WithEvents pageroom As System Windows Forms ComboBox　　　　<System Diagnostics DebuggerStepThrough()> Private Sub InitializeComponent()　　　　　　Me PrintPreviewControl = New System Windows Forms PrintPreviewControl　　　　　　Me printsetup = New dbcbutton dbcbutton　　　　　　Me pagesetup = New dbcbutton dbcbutton　　　　　　Me pagecount = New System Windows Forms NumericUpDown　　　　　　Me pageroom = New System Windows Forms ComboBox　　　　　　Me Label = New System Windows Forms Label　　　　　　Me Label = New System Windows Forms Label　　　　　　Me Label = New System Windows Forms Label　　　　　　Me openfile = New dbcbutton dbcbutton　　　　　　Me setfont = New dbcbutton dbcbutton　　　　　　Me printthis = New dbcbutton dbcbutton　　　　　　CType(Me pagecount System ComponentModel ISupportInitialize) BeginInit()　　　　　　Me SuspendLayout()　　　　　　 　　　　　　 PrintPreviewControl 　　　　　　 　　　　　　Me PrintPreviewControl Anchor = CType((((System Windows Forms AnchorStyles Top Or System Windows Forms AnchorStyles Bottom) _　　　　　　　　　　　　Or System Windows Forms AnchorStyles Left) _　　　　　　　　　　　　Or System Windows Forms AnchorStyles Right) System Windows Forms AnchorStyles)　　　　　　Me PrintPreviewControl AutoZoom = False　　　　　　Me PrintPreviewControl Location = New System Drawing Point( )　　　　　　Me PrintPreviewControl Name = PrintPreviewControl 　　　　　　Me PrintPreviewControl Size = New System Drawing Size( )　　　　　　Me PrintPreviewControl TabIndex = 　　　　　　Me PrintPreviewControl Zoom = 　　　　　　 　　　　　　 printsetup　　　　　　 　　　　　　Me printsetup BackColor = System Drawing SystemColors Control　　　　　　Me printsetup ButtonStyle = dbcbutton dbcbutton Style RectStyle　　　　　　Me printsetup GrayColor = System Drawing Color BurlyWood　　　　　　Me printsetup LightColor = System Drawing Color White　　　　　　Me printsetup Location = New System Drawing Point( )　　　　　　Me printsetup mytext = 打印设置 　　　　　　Me printsetup Name = printsetup 　　　　　　Me printsetup Size = New System Drawing Size( )　　　　　　Me printsetup TabIndex = 　　　　　　 　　　　　　 pagesetup　　　　　　 　　　　　　Me pagesetup BackColor = System Drawing SystemColors Control　　　　　　Me pagesetup ButtonStyle = dbcbutton dbcbutton Style RectStyle　　　　　　Me pagesetup GrayColor = System Drawing Color BurlyWood　　　　　　Me pagesetup LightColor = System Drawing Color White　　　　　　Me pagesetup Location = New System Drawing Point( )　　　　　　Me pagesetup mytext = 页面设置 　　　　　　Me pagesetup Name = pagesetup 　　　　　　Me pagesetup Size = New System Drawing Size( )　　　　　　Me pagesetup TabIndex = 　　　　　　 　　　　　　 pagecount　　　　　　 　　　　　　Me pagecount Location = New System Drawing Point( )　　　　　　Me pagecount Minimum = New Decimal(New Integer() { })　　　　　　Me pagecount Name = pagecount 　　　　　　Me pagecount Size = New System Drawing Size( )　　　　　　Me pagecount TabIndex = 　　　　　　Me pagecount Value = New Decimal(New Integer() { })　　　　　　 　　　　　　 pageroom　　　　　　 　　　　　　Me pageroom Items AddRange(New Object() { % % % % })　　　　　　Me pageroom Location = New System Drawing Point( )　　　　　　Me pageroom Name = pageroom 　　　　　　Me pageroom Size = New System Drawing Size( )　　　　　　Me pageroom TabIndex = 　　　　　　Me pageroom Text = 缩放 　　　　　　 　　　　　　 Label 　　　　　　 　　　　　　Me Label Location = New System Drawing Point( )　　　　　　Me Label Name = Label 　　　　　　Me Label Size = New System Drawing Size( )　　　　　　Me Label TabIndex = 　　　　　　Me Label Text = 缩放 　　　　　　Me Label TextAlign = System Drawing ContentAlignment MiddleCenter　　　　　　 　　　　　　 Label 　　　　　　 　　　　　　Me Label Location = New System Drawing Point( )　　　　　　Me Label Name = Label 　　　　　　Me Label Size = New System Drawing Size( )　　　　　　Me Label TabIndex = 　　　　　　Me Label Text = 第 　　　　　　Me Label TextAlign = System Drawing ContentAlignment MiddleCenter　　　　　　 　　　　　　 Label 　　　　　　 　　　　　　Me Label Location = New System Drawing Point( )　　　　　　Me Label Name = Label 　　　　　　Me Label Size = New System Drawing Size( )　　　　　　Me Label TabIndex = 　　　　　　Me Label Text = 页 　　　　　　Me Label TextAlign = System Drawing ContentAlignment MiddleCenter　　　　　　 　　　　　　 openfile　　　　　　 　　　　　　Me openfile BackColor = System Drawing SystemColors Control　　　　　　Me openfile ButtonStyle = dbcbutton dbcbutton Style RectStyle　　　　　　Me openfile GrayColor = System Drawing Color BurlyWood　　　　　　Me openfile LightColor = System Drawing Color White　　　　　　Me openfile Location = New System Drawing Point( )　　　　　　Me openfile mytext = 选择文件 　　　　　　Me openfile Name = openfile 　　　　　　Me openfile Size = New System Drawing Size( )　　　　　　Me openfile TabIndex = 　　　　　　 　　　　　　 setfont　　　　　　 　　　　　　Me setfont BackColor = System Drawing SystemColors Control　　　　　　Me setfont ButtonStyle = dbcbutton dbcbutton Style RectStyle　　　　　　Me setfont GrayColor = System Drawing Color BurlyWood　　　　　　Me setfont LightColor = System Drawing Color White　　　　　　Me setfont Location = New System Drawing Point( )　　　　　　Me setfont mytext = 设置字体 　　　　　　Me setfont Name = setfont 　　　　　　Me setfont Size = New System Drawing Size( lishixinzhi/Article/program/Java/hx/201311/27156