📄 restric.frm
字号:
Top = 6360
Width = 1095
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "LHOT"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2760
TabIndex = 58
Top = 5760
Width = 1095
End
Begin VB.Label Label8
BackStyle = 0 'Transparent
Caption = "SHOT"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 57
Top = 7800
Width = 1095
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
Caption = "RDOT"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 56
Top = 7200
Width = 1095
End
Begin VB.Label Label7
BackStyle = 0 'Transparent
Caption = "ROT"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 55
Top = 6600
Width = 1095
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "No of Days"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 54
Top = 6000
Width = 1095
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "Department"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 53
Top = 5160
Width = 1455
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "Position"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 52
Top = 4680
Width = 1095
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "Client"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 51
Top = 4200
Width = 735
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "Surname"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 50
Top = 3600
Width = 1095
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "First Name"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 480
TabIndex = 49
Top = 3000
Width = 1095
End
End
Begin VB.CommandButton Command1
Appearance = 0 'Flat
Height = 615
Left = 7320
TabIndex = 100
Top = 3720
Visible = 0 'False
Width = 1095
End
Begin VB.Frame Frame4
Caption = "SAMPLE"
Height = 1815
Left = 7200
TabIndex = 91
Top = 2400
Visible = 0 'False
Width = 855
Begin VB.TextBox txtd
Height = 375
Left = 120
TabIndex = 98
Top = 360
Width = 855
End
Begin VB.TextBox txtr
Height = 375
Left = 120
TabIndex = 97
Top = 720
Width = 855
End
Begin VB.TextBox txtrd
Height = 375
Left = 120
TabIndex = 96
Top = 1080
Width = 855
End
Begin VB.TextBox txts
Height = 375
Left = 120
TabIndex = 95
Top = 1440
Width = 855
End
Begin VB.TextBox txtl
Height = 375
Left = 120
TabIndex = 94
Top = 1800
Width = 855
End
Begin VB.TextBox txtlt
Height = 375
Left = 120
TabIndex = 93
Top = 2160
Width = 855
End
Begin VB.TextBox txtc
Height = 375
Left = 120
TabIndex = 92
Top = 2520
Width = 855
End
End
Begin VB.TextBox Text9
BeginProperty DataFormat
Type = 1
Format = """$""#,##0.00;(""$""#,##0.00)"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 1033
SubFormatType = 2
EndProperty
Height = 495
Left = 7200
TabIndex = 80
Text = "Text9"
Top = 360
Width = 1215
End
Begin VB.Timer tgs
Interval = 1
Left = 7440
Top = 7440
End
Begin VB.TextBox t
Height = 495
Left = 7560
TabIndex = 79
Top = 960
Width = 1335
End
Begin VB.Frame Frame3
BorderStyle = 0 'None
Caption = "Frame3"
Height = 975
Left = 8640
TabIndex = 78
Top = 2640
Width = 5895
End
Begin VB.Timer Timer1
Interval = 1
Left = 5760
Top = 7440
End
Begin VB.Frame Frame2
Caption = "BILLING RECORD"
BeginProperty Font
Name = "Tahoma"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 855
Left = 8400
TabIndex = 74
Top = 2280
Width = 6735
Begin VB.TextBox Text4
Height = 495
Left = 2520
TabIndex = 77
Top = 360
Width = 1215
End
Begin VB.TextBox Text3
Height = 495
Left = 1320
TabIndex = 76
Top = 360
Width = 1215
End
Begin VB.TextBox Text2
Height = 495
Left = 120
TabIndex = 75
Top = 360
Width = 1215
End
End
Begin VB.Frame Frame6
Caption = "Frame6"
Height = 375
Left = 8400
TabIndex = 69
Top = 2400
Width = 6255
Begin VB.TextBox C4
Height = 375
Left = 4560
TabIndex = 73
Text = "MACRO PROVINCIAL"
Top = 240
Width = 1695
End
Begin VB.TextBox C3
Height = 375
Left = 2640
TabIndex = 72
Text = "MACRO PROVINCIAL"
Top = 240
Width = 1935
End
Begin VB.TextBox C1
Height = 375
Left = 0
TabIndex = 71
Text = "JRS MANILA"
Top = 240
Width = 1335
End
Begin VB.TextBox C2
Height = 375
Left = 1320
TabIndex = 70
Text = "JRS PROVINCIAL"
Top = 240
Width = 1335
End
End
Begin Crystal.CrystalReport CrystalReport1
Left = 1680
Top = 9120
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -