📄 frmlocalpurchaseae.frm
字号:
Begin VB.Label Labels
BackStyle = 0 'Transparent
Caption = "Items/Stocks"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000011D&
Height = 240
Index = 8
Left = 0
TabIndex = 36
Top = 0
Width = 1515
End
Begin VB.Label Labels
BackStyle = 0 'Transparent
Caption = "Unit Price"
Height = 240
Index = 9
Left = 4500
TabIndex = 35
Top = 0
Width = 1290
End
Begin VB.Label Labels
BackStyle = 0 'Transparent
Caption = "Unit Qty"
Height = 240
Index = 10
Left = 2775
TabIndex = 34
Top = 0
Width = 660
End
Begin VB.Label Labels
BackStyle = 0 'Transparent
Caption = "Gross"
Height = 240
Index = 17
Left = 5775
TabIndex = 33
Top = 0
Width = 1260
End
End
Begin VB.Frame frmPayment
Caption = "Bank Form"
Height = 1635
Left = 4440
TabIndex = 8
Top = 1080
Width = 6465
Begin VB.TextBox txtBankDate
Height = 315
Left = 2130
TabIndex = 10
Top = 510
Visible = 0 'False
Width = 1905
End
Begin VB.TextBox txtBank
Height = 285
Left = 2130
TabIndex = 9
Top = 180
Width = 4035
End
Begin VB.TextBox txtCheckAmount
Height = 285
Left = 2130
TabIndex = 12
Top = 1200
Width = 1905
End
Begin VB.TextBox txtCheck
Height = 285
Left = 2130
TabIndex = 11
Top = 870
Width = 1905
End
Begin MSComCtl2.DTPicker dtpBankDate
Height = 315
Left = 2130
TabIndex = 55
Top = 510
Width = 1905
_ExtentX = 3360
_ExtentY = 556
_Version = 393216
CustomFormat = "MMM-dd-yyyy"
Format = 44564483
CurrentDate = 38932
End
Begin VB.Label Label
Alignment = 1 'Right Justify
Caption = "Bank:"
Height = 285
Index = 0
Left = 540
TabIndex = 57
Top = 180
Width = 1515
End
Begin VB.Label Label
Alignment = 1 'Right Justify
Caption = "Date:"
Height = 255
Index = 1
Left = 510
TabIndex = 56
Top = 540
Width = 1545
End
Begin VB.Label Label
Alignment = 1 'Right Justify
Caption = "Check Amount:"
Height = 285
Index = 3
Left = 480
TabIndex = 54
Top = 1200
Width = 1575
End
Begin VB.Label Label
Alignment = 1 'Right Justify
Caption = "Check No.:"
Height = 285
Index = 2
Left = 480
TabIndex = 53
Top = 840
Width = 1575
End
End
Begin VB.Label lblTitle
BackStyle = 0 'Transparent
Caption = "Local Purchase"
BeginProperty Font
Name = "Lucida Sans"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 345
Left = 240
TabIndex = 62
Top = 150
Width = 4905
End
Begin VB.Shape Shape2
FillColor = &H00C0C0C0&
FillStyle = 0 'Solid
Height = 435
Left = 120
Top = 120
Width = 10935
End
Begin VB.Label lblCash
Alignment = 1 'Right Justify
Caption = "Cash:"
Height = 255
Left = 4410
TabIndex = 60
Top = 1080
Width = 1485
End
Begin VB.Label Label2
Alignment = 1 'Right Justify
Caption = "Payment Type:"
Height = 255
Left = 4410
TabIndex = 61
Top = 750
Width = 1485
End
Begin VB.Label Label6
Alignment = 1 'Right Justify
Caption = "Purchase Req. No.:"
Height = 255
Left = 210
TabIndex = 59
Top = 1710
Width = 1485
End
Begin VB.Label Label12
Alignment = 1 'Right Justify
Caption = "Canvass No.:"
Height = 255
Left = 210
TabIndex = 58
Top = 2070
Width = 1485
End
Begin VB.Label Label10
Caption = "Label10"
Height = 525
Left = 5100
TabIndex = 52
Top = 4290
Width = 1245
End
Begin VB.Label Label7
Alignment = 1 'Right Justify
Caption = "Purchase from:"
Height = 255
Left = 210
TabIndex = 51
Top = 750
Width = 1485
End
Begin VB.Label Label11
BackStyle = 0 'Transparent
Caption = "Local Purchase Details"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000014&
Height = 210
Left = 300
TabIndex = 42
Top = 3600
Width = 4365
End
Begin VB.Line Line3
BorderColor = &H80000000&
BorderWidth = 2
X1 = 9210
X2 = 10920
Y1 = 7890
Y2 = 7890
End
Begin VB.Label Label8
Alignment = 1 'Right Justify
Caption = "Vat(0.12)"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000011D&
Height = 240
Left = 7440
TabIndex = 49
Top = 7530
Width = 2040
End
Begin VB.Label Label5
Alignment = 1 'Right Justify
Caption = "Tax Base"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000011D&
Height = 240
Left = 7440
TabIndex = 48
Top = 7230
Width = 2040
End
Begin VB.Shape Shape3
BackColor = &H80000010&
BackStyle = 1 'Opaque
BorderColor = &H80000010&
Height = 240
Left = 225
Top = 3600
Width = 10740
End
Begin VB.Label Labels
Alignment = 1 'Right Justify
Caption = "Invoice No.:"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 0
Left = 210
TabIndex = 45
Top = 1065
Width = 1485
End
Begin VB.Label Labels
Alignment = 1 'Right Justify
Caption = "Date:"
Height = 255
Index = 1
Left = 210
TabIndex = 44
Top = 1380
Width = 1485
End
Begin VB.Label Label9
Alignment = 1 'Right Justify
Caption = "Net"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000011D&
Height = 240
Left = 7440
TabIndex = 43
Top = 7980
Width = 2040
End
Begin VB.Line Line1
BorderColor = &H80000010&
BorderWidth = 2
Index = 1
X1 = 210
X2 = 10935
Y1 = 2820
Y2 = 2820
End
Begin VB.Line Line2
BorderColor = &H80000014&
Index = 1
X1 = 210
X2 = 10935
Y1 = 2790
Y2 = 2790
End
Begin VB.Label Label3
Alignment = 1 'Right Justify
Caption = "Gross"
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000011D&
Height = 240
Left = 7440
TabIndex = 41
Top = 6630
Width = 2040
End
Begin VB.Label Labels
Caption = "Remarks"
Height = 240
Index = 4
Left = 240
TabIndex = 40
Top = 6600
Width = 990
End
Begin VB.Label Label4
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -