|
源代码 Imports SystemDrawingprinting Imports Systemio Public Class previewcontrol Inherits SystemWindowsFormsForm #Region Windows 窗体设计器生成的代码 Public Sub New() MyBaseNew() 该调用是 Windows 窗体设计器所必需的 InitializeComponent() 在 InitializeComponent() 调用之后添加任何初始化 End Sub 窗体重写 dispose 以清理组件列表 Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not (components Is Nothing) Then componentsDispose() End If End If MyBaseDispose(disposing) End Sub Windows 窗体设计器所必需的 Private components As SystemComponentModelIContainer 注意: 以下过程是 Windows 窗体设计器所必需的 可以使用 Windows 窗体设计器修改此过程 不要使用代码编辑器修改它 Friend WithEvents PrintPreviewControl As SystemWindowsFormsPrintPreviewControl Friend WithEvents printsetup As dbcbuttondbcbutton Private WithEvents pagesetup As dbcbuttondbcbutton Friend WithEvents Label As SystemWindowsFormsLabel Friend WithEvents Label As SystemWindowsFormsLabel Friend WithEvents Label As SystemWindowsFormsLabel Friend WithEvents openfile As dbcbuttondbcbutton Friend WithEvents setfont As dbcbuttondbcbutton Friend WithEvents printthis As dbcbuttondbcbutton Friend WithEvents pagecount As SystemWindowsFormsNumericUpDown Friend WithEvents pageroom As SystemWindowsFormsComboBox <SystemDiagnosticsDebuggerStepThrough()> Private Sub InitializeComponent() MePrintPreviewControl = New SystemWindowsFormsPrintPreviewControl Meprintsetup = New dbcbuttondbcbutton Mepagesetup = New dbcbuttondbcbutton Mepagecount = New SystemWindowsFormsNumericUpDown Mepageroom = New SystemWindowsFormsComboBox MeLabel = New SystemWindowsFormsLabel MeLabel = New SystemWindowsFormsLabel MeLabel = New SystemWindowsFormsLabel Meopenfile = New dbcbuttondbcbutton Mesetfont = New dbcbuttondbcbutton Meprintthis = New dbcbuttondbcbutton CType(Mepagecount SystemComponentModelISupportInitialize)BeginInit() MeSuspendLayout()
PrintPreviewControl
MePrintPreviewControlAnchor = CType((((SystemWindowsFormsAnchorStylesTop Or SystemWindowsFormsAnchorStylesBottom) _ Or SystemWindowsFormsAnchorStylesLeft) _ Or SystemWindowsFormsAnchorStylesRight) SystemWindowsFormsAnchorStyles) MePrintPreviewControlAutoZoom = False MePrintPreviewControlLocation = New SystemDrawingPoint( ) MePrintPreviewControlName = PrintPreviewControl MePrintPreviewControlSize = New SystemDrawingSize( ) MePrintPreviewControlTabIndex = MePrintPreviewControlZoom =
printsetup
MeprintsetupBackColor = SystemDrawingSystemColorsControl MeprintsetupButtonStyle = dbcbuttondbcbuttonStyleRectStyle MeprintsetupGrayColor = SystemDrawingColorBurlyWood MeprintsetupLightColor = SystemDrawingColorWhite MeprintsetupLocation = New SystemDrawingPoint( ) Meprintsetupmytext = 打印设置 MeprintsetupName = printsetup MeprintsetupSize = New SystemDrawingSize( ) MeprintsetupTabIndex =
pagesetup
MepagesetupBackColor = SystemDrawingSystemColorsControl MepagesetupButtonStyle = dbcbuttondbcbuttonStyleRectStyle MepagesetupGrayColor = SystemDrawingColorBurlyWood MepagesetupLightColor = SystemDrawingColorWhite MepagesetupLocation = New SystemDrawingPoint( ) Mepagesetupmytext = 页面设置 MepagesetupName = pagesetup MepagesetupSize = New SystemDrawingSize( ) MepagesetupTabIndex =
pagecount
MepagecountLocation = New SystemDrawingPoint( ) MepagecountMinimum = New Decimal(New Integer() { }) MepagecountName = pagecount MepagecountSize = New SystemDrawingSize( ) MepagecountTabIndex = MepagecountValue = New Decimal(New Integer() { })
pageroom
MepageroomItemsAddRange(New Object() {% % % %}) MepageroomLocation = New SystemDrawingPoint( ) MepageroomName = pageroom MepageroomSize = New SystemDrawingSize( ) MepageroomTabIndex = MepageroomText = 缩放
Label
MeLabelLocation = New SystemDrawingPoint( ) MeLabelName = Label MeLabelSize = New SystemDrawingSize( ) MeLabelTabIndex = MeLabelText = 缩放 MeLabelTextAlign = SystemDrawingContentAlignmentMiddleCenter
Label
MeLabelLocation = New SystemDrawingPoint( ) MeLabelName = Label MeLabelSize = New SystemDrawingSize( ) MeLabelTabIndex = MeLabelText = 第 MeLabelTextAlign = SystemDrawingContentAlignmentMiddleCenter
Label
MeLabelLocation = New SystemDrawingPoint( ) MeLabelName = Label MeLabelSize = New SystemDrawingSize( ) MeLabelTabIndex = MeLabelText = 页 MeLabelTextAlign = SystemDrawingContentAlignmentMiddleCenter
openfile
MeopenfileBackColor = SystemDrawingSystemColorsControl MeopenfileButtonStyle = dbcbuttondbcbuttonStyleRectStyle MeopenfileGrayColor = SystemDrawingColorBurlyWood MeopenfileLightColor = SystemDrawingColorWhite MeopenfileLocation = New SystemDrawingPoint( ) Meopenfilemytext = 选择文件 MeopenfileName = openfile MeopenfileSize = New SystemDrawingSize( ) MeopenfileTabIndex =
setfont
MesetfontBackColor = SystemDrawingSystemColorsControl MesetfontButtonStyle = dbcbuttondbcbuttonStyleRectStyle MesetfontGrayColor = SystemDrawingColorBurlyWood MesetfontLightColor = SystemDrawingColorWhite MesetfontLocation = New SystemDrawingPoint( ) Mesetfontmytext = 设置字体 MesetfontName = setfont MesetfontSize = New SystemDrawingSize( |
