📄 frmother.frm
字号:
BorderStyle = 0
PreControl = "ftSmallLeft"
NextControl = "ftLeft"
TextType = 1
Text = "0"
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "飞单左"
Height = 195
Index = 7
Left = 270
TabIndex = 45
Top = 465
Visible = 0 'False
Width = 585
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "飞单顶"
Height = 195
Index = 6
Left = 270
TabIndex = 44
Top = 855
Visible = 0 'False
Width = 585
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "收银帐单制作标准见下图。"
Height = 195
Index = 3
Left = 660
TabIndex = 29
Top = 1995
Width = 2340
End
Begin VB.Shape Shape1
BorderColor = &H00000000&
FillColor = &H00FFFF00&
FillStyle = 0 'Solid
Height = 210
Index = 1
Left = 300
Shape = 3 'Circle
Top = 1965
Width = 270
End
Begin VB.Label Label3
AutoSize = -1 'True
Caption = "宽 11 厘米 高 21 厘米"
Height = 195
Left = 675
TabIndex = 27
Top = 1620
Width = 2220
End
Begin VB.Line Line8
BorderColor = &H000040C0&
X1 = 2895
X2 = 3000
Y1 = 525
Y2 = 585
End
Begin VB.Line Line7
BorderColor = &H000040C0&
X1 = 2895
X2 = 2985
Y1 = 525
Y2 = 465
End
Begin VB.Line Line6
BorderColor = &H000040C0&
X1 = 2895
X2 = 3270
Y1 = 525
Y2 = 525
End
Begin VB.Line Line5
Index = 1
X1 = 3270
X2 = 3270
Y1 = 420
Y2 = 660
End
Begin VB.Line Line5
Index = 0
X1 = 2895
X2 = 2895
Y1 = 420
Y2 = 660
End
Begin VB.Line Line4
BorderColor = &H000000C0&
Index = 0
X1 = 3075
X2 = 3015
Y1 = 780
Y2 = 870
End
Begin VB.Line Line3
BorderColor = &H000000C0&
Index = 0
X1 = 3090
X2 = 3165
Y1 = 765
Y2 = 870
End
Begin VB.Line Line2
BorderColor = &H000000C0&
Index = 0
X1 = 3090
X2 = 3090
Y1 = 780
Y2 = 1050
End
Begin VB.Line Line1
Index = 1
X1 = 2910
X2 = 3270
Y1 = 1035
Y2 = 1035
End
Begin VB.Line Line1
Index = 0
X1 = 2910
X2 = 3270
Y1 = 765
Y2 = 765
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "毫米"
Height = 195
Index = 3
Left = 2490
TabIndex = 9
Top = 870
Width = 390
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "毫米"
Height = 195
Index = 2
Left = 2490
TabIndex = 8
Top = 480
Width = 390
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "帐单顶"
Height = 195
Index = 1
Left = 1485
TabIndex = 7
Top = 870
Width = 585
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "帐单左"
Height = 195
Index = 0
Left = 1485
TabIndex = 6
Top = 480
Width = 585
End
Begin VB.Shape Shape1
BorderColor = &H000000FF&
FillColor = &H0000FFFF&
FillStyle = 0 'Solid
Height = 210
Index = 0
Left = 330
Shape = 3 'Circle
Top = 1290
Width = 270
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "收银帐单尺寸如下: "
Height = 195
Index = 0
Left = 675
TabIndex = 5
Top = 1320
Width = 1860
End
Begin VB.Shape Shape3
BorderColor = &H80000001&
FillColor = &H000080FF&
FillStyle = 0 'Solid
Height = 795
Left = 180
Top = 360
Visible = 0 'False
Width = 1215
End
End
Begin MSComDlg.CommonDialog dlgOpen
Left = 840
Top = 435
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.Line Line17
BorderColor = &H00800080&
X1 = 2190
X2 = 3540
Y1 = 6000
Y2 = 6000
End
Begin VB.Line Line16
BorderColor = &H00800080&
X1 = 2190
X2 = 3540
Y1 = 3435
Y2 = 3435
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "上二厘米与下一厘自行印制"
ForeColor = &H00800080&
Height = 2415
Index = 1
Left = 2625
TabIndex = 33
Top = 3525
Width = 270
End
Begin VB.Line Line15
BorderColor = &H00800080&
X1 = 2445
X2 = 2385
Y1 = 5955
Y2 = 5835
End
Begin VB.Line Line14
BorderColor = &H00800080&
X1 = 2445
X2 = 2520
Y1 = 5955
Y2 = 5820
End
Begin VB.Line Line3
BorderColor = &H00800080&
Index = 3
X1 = 2445
X2 = 2535
Y1 = 3465
Y2 = 3585
End
Begin VB.Line Line4
BorderColor = &H00800080&
Index = 3
X1 = 2430
X2 = 2370
Y1 = 3480
Y2 = 3585
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "单据套打位置"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 1515
Index = 0
Left = 3045
TabIndex = 32
Top = 3870
Width = 285
End
Begin VB.Line Line13
BorderColor = &H00800080&
X1 = 2445
X2 = 2445
Y1 = 3510
Y2 = 5955
End
Begin VB.Line Line1
BorderColor = &H00800000&
Index = 4
X1 = 2190
X2 = 2685
Y1 = 6030
Y2 = 6030
End
Begin VB.Label Label4
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "下1厘米"
ForeColor = &H8000000D&
Height = 195
Index = 1
Left = 2565
TabIndex = 31
Top = 6090
Width = 690
End
Begin VB.Label Label4
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "上2厘米"
ForeColor = &H8000000D&
Height = 195
Index = 0
Left = 2565
TabIndex = 30
Top = 2970
Width = 690
End
Begin VB.Line Line1
BorderColor = &H00800000&
Index = 5
X1 = 2205
X2 = 2685
Y1 = 6330
Y2 = 6330
End
Begin VB.Line Line2
BorderColor = &H00800000&
Index = 2
X1 = 2445
X2 = 2445
Y1 = 6075
Y2 = 6330
End
Begin VB.Line Line3
BorderColor = &H00800000&
Index = 2
X1 = 2445
X2 = 2520
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -