📄 frmmanage.frm
字号:
VERSION 5.00
Object = "{D27CDB6B-AE6D-11CF-96B8-444553540000}#1.0#0"; "Flash.ocx"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "Comdlg32.ocx"
Begin VB.Form frmmanage
AutoRedraw = -1 'True
BorderStyle = 1 'Fixed Single
Caption = "系统管理"
ClientHeight = 8820
ClientLeft = 1425
ClientTop = 1905
ClientWidth = 12405
FillStyle = 0 'Solid
Icon = "frmmanage.frx":0000
LinkTopic = "Form1"
ScaleHeight = 8949.768
ScaleMode = 0 'User
ScaleWidth = 12841.61
WhatsThisHelp = -1 'True
Begin MSComDlg.CommonDialog CommonDialog1
Left = 9480
Top = 5520
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin ShockwaveFlashObjectsCtl.ShockwaveFlash ShockwaveFlash1
Height = 2775
Left = 2160
TabIndex = 3
Top = 1560
Width = 3195
_cx = 5636
_cy = 4895
FlashVars = ""
Movie = "Window"
Src = "Window"
WMode = "Window"
Play = -1 'True
Loop = -1 'True
Quality = "High"
SAlign = ""
Menu = -1 'True
Base = ""
AllowScriptAccess= "always"
Scale = "ShowAll"
DeviceFont = 0 'False
EmbedMovie = 0 'False
BGColor = ""
SWRemote = ""
MovieData = ""
End
Begin MSComctlLib.StatusBar StatusBar1
Align = 2 'Align Bottom
Height = 495
Left = 0
TabIndex = 1
Top = 8325
Width = 12405
_ExtentX = 21881
_ExtentY = 873
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 2
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
AutoSize = 1
Object.Width = 19262
Picture = "frmmanage.frx":030A
Text = "卫生检查 版权所有WO1.0 "
TextSave = "卫生检查 版权所有WO1.0 "
Object.ToolTipText = "寝室卫生检查管理系统"
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Text = "管理系统"
TextSave = "管理系统"
EndProperty
EndProperty
End
Begin MSComctlLib.Toolbar Toolbar2
Align = 1 'Align Top
Height = 360
Left = 0
TabIndex = 0
Top = 0
Width = 12405
_ExtentX = 21881
_ExtentY = 635
ButtonWidth = 609
ButtonHeight = 582
Appearance = 1
Style = 1
ImageList = "ImageList1"
HotImageList = "ImageList1"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 16
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "open"
Object.ToolTipText = "打开Flash文件"
ImageIndex = 17
Style = 5
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "save"
Object.ToolTipText = "开始播放Flash"
ImageIndex = 22
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "inquire"
Object.ToolTipText = "卫生检查信息查询"
ImageIndex = 10
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "inquireroom"
Object.ToolTipText = "寝室成员信息查询"
ImageIndex = 14
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button7 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "staff"
Object.ToolTipText = "卫生检查工作人员信息"
ImageIndex = 19
EndProperty
BeginProperty Button8 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "reward"
Object.ToolTipText = "寝室奖罚信息"
ImageIndex = 20
EndProperty
BeginProperty Button9 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "addcheck"
Object.ToolTipText = "添加与修改卫生检查信息"
ImageIndex = 13
EndProperty
BeginProperty Button10 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button11 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "count"
Object.ToolTipText = "评分计算"
ImageIndex = 16
EndProperty
BeginProperty Button12 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "addstaff"
Object.ToolTipText = "添加卫生检查工作人员"
ImageIndex = 12
EndProperty
BeginProperty Button13 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "addroom"
Object.ToolTipText = "添加寝室成员"
ImageIndex = 21
EndProperty
BeginProperty Button14 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "del"
Object.ToolTipText = "退出系统"
ImageIndex = 23
EndProperty
BeginProperty Button15 {66833FEA-8583-11D1-B16A-00C0F0283628}
Object.ToolTipText = "刷新"
ImageIndex = 1
EndProperty
BeginProperty Button16 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "yongh"
Object.ToolTipText = "用户注册"
ImageIndex = 24
EndProperty
EndProperty
MousePointer = 1
MouseIcon = "frmmanage.frx":0624
Begin MSComctlLib.TreeView TreeView1
Height = 135
Left = 1560
TabIndex = 2
Top = 240
Width = 30
_ExtentX = 53
_ExtentY = 238
_Version = 393217
Style = 7
Appearance = 1
End
Begin MSComctlLib.ImageList ImageList1
Left = 6480
Top = -120
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 24
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":0A76
Key = ""
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":0D90
Key = ""
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":10AA
Key = ""
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":1984
Key = ""
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":1C9E
Key = ""
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":2B78
Key = ""
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":2E92
Key = ""
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":376C
Key = ""
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":3A86
Key = ""
EndProperty
BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":3DA0
Key = ""
EndProperty
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4032
Key = ""
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4144
Key = ""
EndProperty
BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4256
Key = ""
EndProperty
BeginProperty ListImage14 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4368
Key = ""
EndProperty
BeginProperty ListImage15 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":447A
Key = ""
EndProperty
BeginProperty ListImage16 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":470C
Key = ""
EndProperty
BeginProperty ListImage17 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":499E
Key = ""
EndProperty
BeginProperty ListImage18 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4AB0
Key = ""
EndProperty
BeginProperty ListImage19 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4BC2
Key = ""
EndProperty
BeginProperty ListImage20 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4CD4
Key = ""
EndProperty
BeginProperty ListImage21 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4DE6
Key = ""
EndProperty
BeginProperty ListImage22 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":4EF8
Key = ""
EndProperty
BeginProperty ListImage23 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":500A
Key = ""
EndProperty
BeginProperty ListImage24 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmmanage.frx":511C
Key = ""
EndProperty
EndProperty
End
End
Begin VB.Image Image1
Height = 11520
Left = 0
MouseIcon = "frmmanage.frx":53AE
MousePointer = 99 'Custom
Picture = "frmmanage.frx":57F0
Top = -1440
Width = 15360
End
Begin VB.Menu menu_hygiene_check
Caption = "卫生检查管理(C)"
Begin VB.Menu menu_manage
Caption = "卫生检查信息(M)"
Shortcut = ^{F1}
End
Begin VB.Menu menu_tx
Caption = "修改和添加检查信息"
Shortcut = +^{F1}
End
Begin VB.Menu menu16
Caption = "-"
End
Begin VB.Menu menu_roomnum
Caption = "卫生检查评分计算信息"
Shortcut = ^V
End
Begin VB.Menu menu2
Caption = "-"
Index = 2
End
Begin VB.Menu menu_new
Caption = "刷新"
Shortcut = {F8}
End
Begin VB.Menu exit_system
Caption = "退出系统(E)"
Shortcut = +{DEL}
End
Begin VB.Menu menu_line
Caption = "-"
End
End
Begin VB.Menu memu_room_manage
Caption = "辅助信息管理(R)"
Begin VB.Menu menu_roomname
Caption = "寝室成员信息(T)"
Shortcut = ^N
End
Begin VB.Menu menu_txq
Caption = "修改和添加寝室信息"
Shortcut = +^{F2}
End
Begin VB.Menu menu3
Caption = "-"
Index = 3
End
Begin VB.Menu menu_check_staff
Caption = "卫生检查工作人员信息"
Shortcut = ^S
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -