?? frmmultipgpreview_bmpjpg4.frm
字號:
VERSION 5.00
Begin VB.Form frmMultiPgPreview
Appearance = 0 'Flat
BackColor = &H80000010&
BorderStyle = 0 'None
ClientHeight = 6885
ClientLeft = 4005
ClientTop = 2970
ClientWidth = 7665
ControlBox = 0 'False
ForeColor = &H80000008&
Icon = "FRMMUL~4.frx":0000
KeyPreview = -1 'True
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
PaletteMode = 1 'UseZOrder
ScaleHeight = 6885
ScaleWidth = 7665
ShowInTaskbar = 0 'False
Begin VB.PictureBox picGoto
Appearance = 0 'Flat
BackColor = &H80000010&
ForeColor = &H80000008&
Height = 810
Left = 0
ScaleHeight = 780
ScaleWidth = 3090
TabIndex = 34
Top = 5700
Visible = 0 'False
Width = 3120
Begin VB.TextBox txtGoto
Height = 315
Left = 1305
TabIndex = 36
Text = "1"
Top = 105
Width = 1590
End
Begin VB.CommandButton cmdGotoOK
Caption = "Ok"
Height = 255
Left = 2100
TabIndex = 35
Top = 495
Width = 780
End
Begin VB.Shape Shape2
BorderColor = &H8000000F&
Height = 750
Left = 15
Top = 15
Width = 3045
End
Begin VB.Label Label5
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "Goto Page#"
ForeColor = &H80000014&
Height = 465
Left = 120
TabIndex = 37
Top = 165
Width = 1080
End
End
Begin VB.PictureBox picFullPage
Appearance = 0 'Flat
AutoRedraw = -1 'True
BackColor = &H80000005&
ForeColor = &H80000008&
Height = 675
Left = 3840
ScaleHeight = 43
ScaleMode = 3 'Pixel
ScaleWidth = 16
TabIndex = 18
Top = 2340
Visible = 0 'False
Width = 270
End
Begin VB.PictureBox picPrintPic
Appearance = 0 'Flat
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 435
Left = 3885
ScaleHeight = 435
ScaleWidth = 255
TabIndex = 17
Top = 4440
Visible = 0 'False
Width = 255
End
Begin VB.PictureBox Picture2
Align = 4 'Align Right
AutoRedraw = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 6615
Left = 7110
ScaleHeight = 6615
ScaleWidth = 555
TabIndex = 11
TabStop = 0 'False
Top = 0
Width = 555
Begin VB.VScrollBar VScroll1
Height = 1260
Left = 105
Max = 100
Min = -20
TabIndex = 32
Top = 3495
Width = 330
End
Begin VB.CommandButton Command1
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 345
Index = 0
Left = 45
Picture = "FRMMUL~4.frx":000C
Style = 1 'Graphical
TabIndex = 31
TabStop = 0 'False
ToolTipText = "Prev. Page"
Top = 2580
UseMaskColor = -1 'True
Width = 225
End
Begin VB.CommandButton Command1
BeginProperty Font
Name = "Arial"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 345
Index = 1
Left = 285
Picture = "FRMMUL~4.frx":03AC
Style = 1 'Graphical
TabIndex = 30
TabStop = 0 'False
ToolTipText = "Next Page"
Top = 2580
UseMaskColor = -1 'True
Width = 225
End
Begin VB.CommandButton cmdGoTo
Caption = "&Goto"
Height = 510
Left = 45
Picture = "FRMMUL~4.frx":0727
Style = 1 'Graphical
TabIndex = 29
TabStop = 0 'False
ToolTipText = "Goto Page"
Top = 2955
Width = 465
End
Begin VB.CheckBox cmdFullPage
Caption = "Fit"
Height = 510
Left = 30
Style = 1 'Graphical
TabIndex = 28
TabStop = 0 'False
ToolTipText = "Fit Page"
Top = 1215
Width = 525
End
Begin VB.CommandButton cmd_quit
Cancel = -1 'True
Caption = "Exit"
Height = 630
Left = 30
Picture = "FRMMUL~4.frx":1129
Style = 1 'Graphical
TabIndex = 2
TabStop = 0 'False
ToolTipText = "Close"
Top = 0
Width = 525
End
Begin VB.CommandButton cmd_print
Caption = "Print"
Height = 585
Left = 30
Picture = "FRMMUL~4.frx":1813
Style = 1 'Graphical
TabIndex = 1
TabStop = 0 'False
ToolTipText = "Print Options"
Top = 630
Width = 525
End
Begin VB.Label Label1
Alignment = 2 'Center
Caption = "P 1"
Height = 600
Left = 45
TabIndex = 33
Top = 1830
Width = 465
End
End
Begin VB.PictureBox picHScroll
Align = 2 'Align Bottom
BorderStyle = 0 'None
Height = 270
Left = 0
ScaleHeight = 270
ScaleWidth = 7665
TabIndex = 14
TabStop = 0 'False
Top = 6615
Visible = 0 'False
Width = 7665
Begin VB.HScrollBar HScroll1
Height = 270
Left = 0
Max = 100
TabIndex = 3
Top = 0
Width = 3765
End
End
Begin VB.PictureBox picPrintOptions
Appearance = 0 'Flat
BackColor = &H80000010&
ForeColor = &H000000FF&
Height = 2640
Left = 555
ScaleHeight = 2610
ScaleWidth = 3150
TabIndex = 12
TabStop = 0 'False
Top = 615
Visible = 0 'False
Width = 3180
Begin VB.TextBox txtFrom
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Height = 285
Left = 1695
TabIndex = 7
Text = "1"
Top = 1350
Width = 420
End
Begin VB.TextBox txtTo
Alignment = 1 'Right Justify
Appearance = 0 'Flat
Height = 285
Left = 2475
TabIndex = 8
Text = "1"
Top = 1350
Width = 420
End
Begin VB.CommandButton cmdPrint
Caption = "Ok"
Height = 360
Left = 2145
TabIndex = 10
Top = 2070
Width = 705
End
Begin VB.Label optText
BackStyle = 0 'Transparent
Caption = "Copy all pages to a Folder"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000014&
Height = 300
Index = 4
Left = 585
TabIndex = 19
Top = 420
Width = 2250
End
Begin VB.Image optPrint
Appearance = 0 'Flat
Height = 225
Index = 4
Left = 270
Picture = "FRMMUL~4.frx":1C0C
Top = 390
Width = 300
End
Begin VB.Image optPrint
Appearance = 0 'Flat
Height = 225
Index = 0
Left = 270
Picture = "FRMMUL~4.frx":1CA9
Top = 705
Width = 300
End
Begin VB.Label optText
BackStyle = 0 'Transparent
Caption = "Copy page to clipboard"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000014&
Height = 300
Index = 0
Left = 585
TabIndex = 4
Top = 735
Width = 2250
End
Begin VB.Label optText
BackStyle = 0 'Transparent
Caption = "Print Current Page"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000014&
Height = 300
Index = 1
Left = 585
TabIndex = 5
Top = 1065
Width = 1965
End
Begin VB.Image optPrint
Appearance = 0 'Flat
Height = 225
Index = 1
Left = 270
Picture = "FRMMUL~4.frx":1D46
Top = 1035
Width = 300
End
Begin VB.Image optPrint
Appearance = 0 'Flat
Height = 225
Index = 2
Left = 270
Picture = "FRMMUL~4.frx":1DE3
Top = 1335
Width = 300
End
Begin VB.Image optPrint
Appearance = 0 'Flat
Height = 225
Index = 3
Left = 270
Picture = "FRMMUL~4.frx":1E80
Top = 1665
Width = 300
End
Begin VB.Label optText
BackStyle = 0 'Transparent
Caption = "Print All"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000014&
Height = 300
Index = 3
Left = 585
TabIndex = 9
Top = 1695
Width = 1965
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "To"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FFFFFF&
Height = 270
Left = 2175
TabIndex = 16
Top = 1380
Width = 345
End
Begin VB.Label lblPrintingPg
Alignment = 2 'Center
BackColor = &H80000005&
ForeColor = &H80000008&
Height = 210
Left = 255
TabIndex = 15
Top = 2250
Visible = 0 'False
Width = 2670
End
Begin VB.Label Label3
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Print Options"
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H8000000F&
Height = 315
Left = 135
TabIndex = 13
Top = 30
Width = 2865
End
Begin VB.Shape Shape1
BorderColor = &H8000000F&
Height = 2535
Left = 30
Top = 30
Width = 3090
End
Begin VB.Label optText
BackStyle = 0 'Transparent
Caption = "Print Pages"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -