📄 frmsetformat.frm
字号:
Left = 420
TabIndex = 68
Top = 870
Width = 2055
End
Begin VB.OptionButton OptFormatset
Caption = "红字"
Height = 180
Index = 6
Left = 420
TabIndex = 67
Top = 570
Width = 675
End
Begin VB.OptionButton OptFormatset
Caption = "通用 -125"
Height = 180
Index = 5
Left = 420
TabIndex = 66
Top = 270
Width = 1665
End
Begin VB.Label LblTitle
Caption = "125"
ForeColor = &H008080FF&
Height = 165
Index = 9
Left = 1500
TabIndex = 69
Top = 570
Width = 255
End
End
Begin VB.Frame FraFormatSet
Caption = "显示(&V)"
Height = 1335
Index = 2
Left = -74370
TabIndex = 61
Top = 540
Width = 5175
Begin VB.CheckBox ChkFormatSet
Caption = "显示分隔符(，)"
Height = 210
Index = 4
Left = 450
TabIndex = 64
Top = 960
Width = 1575
End
Begin VB.CheckBox ChkFormatSet
Caption = "只显非零值"
Height = 210
Index = 3
Left = 450
TabIndex = 63
Top = 630
Width = 1215
End
Begin VB.CheckBox ChkFormatSet
Caption = "显示金额线"
Height = 210
Index = 2
Left = 450
TabIndex = 62
Top = 300
Width = 1215
End
End
Begin VB.CheckBox ChkFormatSet
Caption = "页末空行补齐(&D)"
Height = 285
Index = 1
Left = 4440
TabIndex = 11
Top = 3090
Width = 1665
End
Begin VB.Frame FraFormatSet
Caption = "设置"
Height = 1425
Index = 1
Left = 360
TabIndex = 55
Top = 1530
Width = 5685
Begin VB.CheckBox ChkCatenaPrint
Caption = "连续打印"
Height = 195
Left = 4350
TabIndex = 125
Top = 1530
Visible = 0 'False
Width = 1065
End
Begin GACALENDARLibCtl.SpinEdit SpiRows
Height = 255
Left = 1620
OleObjectBlob = "FrmSetFormat.frx":02C5
TabIndex = 9
Top = 1050
Width = 915
End
Begin GACALENDARLibCtl.SpinEdit SpiRowHeight
Height = 255
Left = 1620
OleObjectBlob = "FrmSetFormat.frx":036C
TabIndex = 7
Top = 750
Width = 915
End
Begin VB.OptionButton OptFormatset
Caption = "指定每页行数"
Height = 180
Index = 4
Left = 240
TabIndex = 5
Top = 480
Width = 1665
End
Begin VB.OptionButton OptFormatset
Caption = "自动设置每页行数"
Height = 180
Index = 3
Left = 240
TabIndex = 4
Top = 210
Value = -1 'True
Width = 2265
End
Begin VB.Label LblTitle
Caption = "(1～41)"
Height = 165
Index = 8
Left = 2610
TabIndex = 60
Top = 1080
Width = 945
End
Begin VB.Label LblTitle
Caption = "每页行数(&I)"
Height = 165
Index = 7
Left = 570
TabIndex = 8
Top = 1080
Width = 1005
End
Begin VB.Label LblTitle
Caption = "毫米(15～1500)"
Height = 165
Index = 6
Left = 2580
TabIndex = 59
Top = 780
Width = 1275
End
Begin VB.Label LblTitle
Caption = "每行行高(&H)"
Height = 165
Index = 5
Left = 570
TabIndex = 6
Top = 780
Width = 1035
End
End
Begin VB.Frame FraFormatSet
Caption = "缩放"
Height = 975
Index = 0
Left = 360
TabIndex = 54
Top = 480
Width = 5685
Begin GACALENDARLibCtl.SpinEdit SpiZoomScale
Height = 255
Left = 1410
OleObjectBlob = "FrmSetFormat.frx":0413
TabIndex = 1
Top = 210
Width = 675
End
Begin VB.OptionButton OptFormatset
Caption = "最合适的纸高(&H)"
Height = 180
Index = 2
Left = 90
TabIndex = 3
Top = 630
Width = 1905
End
Begin VB.OptionButton OptFormatset
Caption = "最合适的纸宽(&L)"
Height = 180
Index = 1
Left = 2460
TabIndex = 2
Top = 630
Width = 1695
End
Begin VB.OptionButton OptFormatset
Caption = "缩放比例(&A)"
Height = 225
Index = 0
Left = 90
TabIndex = 0
Top = 210
Width = 1305
End
Begin VB.Label LblTitle
Caption = "% 正常尺寸"
Height = 165
Index = 2
Left = 2160
TabIndex = 58
Top = 240
Width = 915
End
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 1
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":04BA
TabIndex = 23
Top = 810
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 2
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":0561
TabIndex = 25
Top = 1140
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 3
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":0608
TabIndex = 27
Top = 1470
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 4
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":06AF
TabIndex = 31
Top = 2130
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 5
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":0756
TabIndex = 33
Top = 2460
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiPageBorder
Height = 255
Index = 6
Left = -73890
OleObjectBlob = "FrmSetFormat.frx":07FD
TabIndex = 29
Top = 1800
Width = 1005
End
Begin GACALENDARLibCtl.SpinEdit SpiLineSpace
Height = 315
Left = 750
OleObjectBlob = "FrmSetFormat.frx":08A4
TabIndex = 115
Top = 3060
Width = 765
End
Begin VB.CheckBox ChkFormatSet
Caption = "需要行分隔线"
Height = 285
Index = 0
Left = 450
TabIndex = 10
Top = 3090
Width = 2025
End
Begin VB.Label Label2
Caption = "毫米"
Height = 285
Left = -72870
TabIndex = 117
Top = 360
Visible = 0 'False
Width = 465
End
Begin VB.Label Label1
Caption = "毫米"
Height = 285
Left = -72900
TabIndex = 116
Top = 420
Visible = 0 'False
Width = 465
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 35
Left = -72810
TabIndex = 113
Top = 2490
Width = 375
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 34
Left = -72810
TabIndex = 112
Top = 2160
Width = 375
End
Begin VB.Label LblTitle
Caption = "页脚(&O)"
Height = 195
Index = 14
Left = -74730
TabIndex = 32
Top = 2490
Width = 645
End
Begin VB.Label LblTitle
Caption = "页眉(&H)"
Height = 195
Index = 15
Left = -74730
TabIndex = 30
Top = 2160
Width = 675
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 36
Left = -72810
TabIndex = 111
Top = 1830
Width = 375
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 33
Left = -72810
TabIndex = 110
Top = 1530
Width = 375
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 32
Left = -72810
TabIndex = 109
Top = 1200
Width = 375
End
Begin VB.Label LblTitle
Caption = "毫米"
Height = 195
Index = 31
Left = -72810
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -