📄 attandance_entry.frm
字号:
Alignment = 1 'Right Justify
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 25
Left = 600
Locked = -1 'True
TabIndex = 10
Top = 10440
Width = 1215
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 16
Left = 1800
Locked = -1 'True
TabIndex = 9
Top = 7200
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 17
Left = 1800
Locked = -1 'True
TabIndex = 8
Top = 7560
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 18
Left = 1800
Locked = -1 'True
TabIndex = 7
Top = 7920
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 19
Left = 1800
Locked = -1 'True
TabIndex = 6
Top = 8280
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 20
Left = 1800
Locked = -1 'True
TabIndex = 5
Top = 8640
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 21
Left = 1800
Locked = -1 'True
TabIndex = 4
Top = 9000
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 22
Left = 1800
Locked = -1 'True
TabIndex = 3
Top = 9360
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 23
Left = 1800
Locked = -1 'True
TabIndex = 2
Top = 9720
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 24
Left = 1800
Locked = -1 'True
TabIndex = 1
Top = 10080
Width = 5895
End
Begin VB.TextBox txtName
Appearance = 0 'Flat
BackColor = &H80000018&
BeginProperty Font
Name = "Palatino Linotype"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 25
Left = 1800
Locked = -1 'True
TabIndex = 0
Top = 10440
Width = 5895
End
Begin VB.Label Label7
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "Student Attendance Entry"
BeginProperty Font
Name = "Palatino Linotype"
Size = 36
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 1335
Left = 2160
TabIndex = 95
Top = 240
Width = 9615
End
Begin VB.Label Label4
BackColor = &H00FDECDF&
Caption = "Date:"
BeginProperty Font
Name = "Comic Sans MS"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800080&
Height = 375
Left = 10560
TabIndex = 85
Top = 1320
Width = 855
End
Begin VB.Label lblbatch
BackColor = &H00FDECDF&
Caption = "Select Batch"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 9240
TabIndex = 84
Top = 6480
Width = 2055
End
Begin VB.Label Label5
BackColor = &H00FDECDF&
Caption = "Select Subject"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 8040
TabIndex = 81
Top = 5640
Width = 2175
End
Begin VB.Label lbldate
BackColor = &H00FDECDF&
BeginProperty Font
Name = "Comic Sans MS"
Size = 12
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004000&
Height = 975
Left = 11520
TabIndex = 79
Top = 1080
Width = 2055
End
Begin VB.Label Label3
BackColor = &H00FDECDF&
Caption = "Select Branch"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 8040
TabIndex = 76
Top = 2880
Width = 2415
End
Begin VB.Label Label2
BackColor = &H00FDECDF&
Caption = "Select Division"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 8040
TabIndex = 75
Top = 4680
Width = 2415
End
Begin VB.Label Label1
BackColor = &H00FDECDF&
Caption = "Select Year"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 8040
TabIndex = 74
Top = 3720
Width = 2415
End
Begin VB.Label lblRollNo
BackStyle = 0 'Transparent
Caption = "Roll NO"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 51
Top = 1320
Width = 1215
End
Begin VB.Label lblName
BackStyle = 0 'Transparent
Caption = "Name Of Student"
BeginProperty Font
Name = "Palatino Linotype"
Size = 15.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -