📄 frmmain.frm
字号:
VERSION 5.00
Begin VB.MDIForm frmMain
BackColor = &H8000000C&
Caption = "仓库管理系统"
ClientHeight = 4815
ClientLeft = 60
ClientTop = 630
ClientWidth = 8835
Icon = "frmMain.frx":0000
LinkTopic = "MDIForm1"
Moveable = 0 'False
StartUpPosition = 1 '所有者中心
Begin VB.PictureBox Picrjxx
Align = 4 'Align Right
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
ForeColor = &H80000008&
Height = 4815
Left = 6060
ScaleHeight = 4785
ScaleWidth = 2745
TabIndex = 16
Top = 0
Width = 2775
Begin VB.Label Labdqrq
BackStyle = 0 'Transparent
Caption = "当前日期:"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 0
Left = 240
TabIndex = 20
Top = 300
Width = 975
End
Begin VB.Label Labdqrq
BackStyle = 0 'Transparent
Caption = "2004年1月1日"
Height = 195
Index = 1
Left = 1320
TabIndex = 19
Top = 300
Width = 1755
End
Begin VB.Label Labczyh
BackStyle = 0 'Transparent
Caption = "操作用户:"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 0
Left = 240
TabIndex = 18
Top = 720
Width = 975
End
Begin VB.Label Labczyh
BackStyle = 0 'Transparent
Caption = "admin"
Height = 195
Index = 1
Left = 1320
TabIndex = 17
Top = 720
Width = 1755
End
End
Begin VB.PictureBox Picczxx
Align = 3 'Align Left
Appearance = 0 'Flat
BackColor = &H00FFFFFF&
ForeColor = &H80000008&
Height = 4815
Left = 0
ScaleHeight = 4785
ScaleWidth = 6375
TabIndex = 0
Top = 0
Width = 6405
Begin VB.Label Labbbgl
BackStyle = 0 'Transparent
Caption = "部门领用年度汇总表"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000040C0&
Height = 255
Index = 3
Left = 2040
MouseIcon = "frmMain.frx":0442
MousePointer = 99 'Custom
TabIndex = 31
Top = 4200
Width = 1815
End
Begin VB.Label Labbbgl
BackStyle = 0 'Transparent
Caption = "部门领用汇总表"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000040C0&
Height = 255
Index = 2
Left = 360
MouseIcon = "frmMain.frx":074C
MousePointer = 99 'Custom
TabIndex = 30
Top = 4200
Width = 1575
End
Begin VB.Label Labbbgl
BackStyle = 0 'Transparent
Caption = "部门领用明细表"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000040C0&
Height = 255
Index = 1
Left = 360
MouseIcon = "frmMain.frx":0A56
MousePointer = 99 'Custom
TabIndex = 29
Top = 3840
Width = 1455
End
Begin VB.Label Labbbgl
BackStyle = 0 'Transparent
Caption = "报表管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 0
Left = 360
TabIndex = 26
Top = 3480
Width = 1575
End
Begin VB.Shape Shape3
BackColor = &H00FFC0C0&
BackStyle = 1 'Opaque
BorderColor = &H00FFC0C0&
Height = 435
Left = 240
Shape = 4 'Rounded Rectangle
Top = 3360
Width = 5775
End
Begin VB.Label Labfzxmgl
Alignment = 2 'Center
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "辅助项目管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Index = 0
Left = 240
TabIndex = 24
Top = 1560
Width = 1875
End
Begin VB.Label Labxtwh
Alignment = 2 'Center
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "系统维护"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Index = 0
Left = 3360
TabIndex = 23
Top = 1560
Width = 1155
End
Begin VB.Shape Shape1
BackColor = &H00FFC0C0&
BackStyle = 1 'Opaque
BorderColor = &H00FFC0C0&
Height = 435
Left = 240
Shape = 4 'Rounded Rectangle
Top = 1440
Width = 5775
End
Begin VB.Label Labdjcl
Alignment = 2 'Center
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "单据管理"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Index = 0
Left = 360
TabIndex = 22
Top = 240
Width = 1095
End
Begin VB.Label Labtjcx
Alignment = 2 'Center
BackColor = &H00FFC0C0&
BackStyle = 0 'Transparent
Caption = "统计查询"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 255
Index = 0
Left = 3360
TabIndex = 21
Top = 240
Width = 1095
End
Begin VB.Shape Shape2
BackColor = &H00FFC0C0&
BackStyle = 1 'Opaque
BorderColor = &H00FFC0C0&
Height = 435
Left = 240
Shape = 4 'Rounded Rectangle
Top = 120
Width = 5655
End
Begin VB.Label Labfzxmgl
BackStyle = 0 'Transparent
Caption = "部门管理"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008080&
Height = 255
Index = 1
Left = 360
MouseIcon = "frmMain.frx":0D60
MousePointer = 99 'Custom
TabIndex = 15
Top = 2160
Width = 975
End
Begin VB.Label Labfzxmgl
BackStyle = 0 'Transparent
Caption = "员工管理"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008080&
Height = 255
Index = 2
Left = 1680
MouseIcon = "frmMain.frx":106A
MousePointer = 99 'Custom
TabIndex = 14
Top = 2160
Width = 975
End
Begin VB.Label Labfzxmgl
BackStyle = 0 'Transparent
Caption = "物品管理"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008080&
Height = 255
Index = 3
Left = 360
MouseIcon = "frmMain.frx":1374
MousePointer = 99 'Custom
TabIndex = 13
Top = 2580
Width = 975
End
Begin VB.Label Labfzxmgl
BackStyle = 0 'Transparent
Caption = "供应商管理"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00008080&
Height = 255
Index = 4
Left = 1680
MouseIcon = "frmMain.frx":167E
MousePointer = 99 'Custom
TabIndex = 12
Top = 2580
Width = 975
End
Begin VB.Label Labfzxmgl
BackStyle = 0 'Transparent
Caption = "物品类别管理"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = -1 'True
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -