📄 frmmdimain.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{D27CDB6B-AE6D-11CF-96B8-444553540000}#1.0#0"; "Flash.ocx"
Object = "{FD7EECEF-93A4-46C6-82C3-7AFDA12DE89E}#1.0#0"; "VsNetMenu.ocx"
Object = "{3A6644DE-3402-11D9-9DE7-C33FAA87690A}#1.0#0"; "WinXPCEngine.ocx"
Begin VB.MDIForm Frmmdimain
BackColor = &H00FF8080&
Caption = "华师 A.C.M. 会员管理系统 Ver 1.0 版 仙人掌工作室作品"
ClientHeight = 8535
ClientLeft = 60
ClientTop = 630
ClientWidth = 10845
Icon = "Frmmdimain.frx":0000
LinkTopic = "MDIForm1"
StartUpPosition = 2 '屏幕中心
WindowState = 2 'Maximized
Begin VB.PictureBox Picture1
Align = 1 'Align Top
BackColor = &H00FF8080&
Height = 2280
Left = 0
ScaleHeight = 2220
ScaleWidth = 10785
TabIndex = 13
Top = 615
Width = 10845
Begin ShockwaveFlashObjectsCtl.ShockwaveFlash ShockwaveFlash1
Height = 2775
Left = 0
TabIndex = 15
Top = -240
Width = 12375
_cx = 21828
_cy = 4895
FlashVars = ""
Movie = "E:\仙人掌工作室\cvb.swf"
Src = "E:\仙人掌工作室\cvb.swf"
WMode = "Transparent"
Play = -1 'True
Loop = -1 'True
Quality = "High"
SAlign = ""
Menu = -1 'True
Base = ""
AllowScriptAccess= "always"
Scale = "NoScale"
DeviceFont = 0 'False
EmbedMovie = 0 'False
BGColor = ""
SWRemote = ""
MovieData = ""
SeamlessTabbing = -1 'True
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "A.C.M."
BeginProperty Font
Name = "宋体"
Size = 150
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 3615
Left = 4560
TabIndex = 14
Top = -360
Width = 11775
End
Begin VB.Image Image1
Height = 1890
Left = 1200
Picture = "Frmmdimain.frx":7D42
Top = 480
Width = 1650
End
End
Begin VBVsNetMenu.VsNetMenu VsNetMenu1
Left = 3000
Top = 1440
_ExtentX = 926
_ExtentY = 926
BmpCount = 10
Bmp:1 = "Frmmdimain.frx":CBDB
Key:1 = "#mnuAdduser"
Bmp:2 = "Frmmdimain.frx":D003
Key:2 = "#mnuReLogin"
Bmp:3 = "Frmmdimain.frx":D42B
Key:3 = "#mnuExit"
Bmp:4 = "Frmmdimain.frx":D853
Key:4 = "#mnuQueryRecord"
Bmp:5 = "Frmmdimain.frx":DC7B
Key:5 = "#mnuQueryCheck"
Bmp:6 = "Frmmdimain.frx":E0A3
Key:6 = "#mnuQueryComment"
Bmp:7 = "Frmmdimain.frx":E4CB
Key:7 = "#mnuQueryPay"
Bmp:8 = "Frmmdimain.frx":E8F3
Key:8 = "#mnuQueryMove"
Bmp:9 = "Frmmdimain.frx":ED1B
Key:9 = "#mnuAddRecord"
Bmp:10 = "Frmmdimain.frx":F143
Key:10 = "#mnuRecordR"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin MSComctlLib.StatusBar StaBar
Align = 2 'Align Bottom
Height = 375
Left = 0
TabIndex = 11
Top = 8160
Width = 10845
_ExtentX = 19129
_ExtentY = 661
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 5
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 3969
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 3969
EndProperty
BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 3969
EndProperty
BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 3969
EndProperty
BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Style = 1
Alignment = 1
Enabled = 0 'False
TextSave = "CAPS"
EndProperty
EndProperty
End
Begin VBVsNetMenu.VsToolBar TbrToolBar
Align = 1 'Align Top
Height = 615
Left = 0
TabIndex = 0
Top = 0
Width = 10845
_ExtentX = 19129
_ExtentY = 1085
ForeColor = -2147483630
BorderStyle = -12278
BorderPart = 14
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 10
Left = 3480
TabIndex = 12
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":F56B
ButtonAppearance= 3
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 495
Index = 0
Left = -15
TabIndex = 1
Top = 60
Width = 180
_ExtentX = 318
_ExtentY = 873
Enabled = 0 'False
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonAppearance= 2
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 1
Left = 165
TabIndex = 2
ToolTipText = "添加用户"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":F885
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 2
Left = 720
TabIndex = 3
ToolTipText = "重新登录"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":175D7
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 3
Left = 1320
TabIndex = 4
ToolTipText = "退出系统"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":1F329
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 495
Index = 4
Left = 1935
TabIndex = 5
Top = 60
Width = 180
_ExtentX = 318
_ExtentY = 873
Enabled = 0 'False
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonAppearance= 1
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 5
Left = 2115
TabIndex = 6
ToolTipText = "添加员工信息"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":2707B
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 6
Left = 2715
TabIndex = 7
ToolTipText = "查询信息"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":27415
ButtonAppearance= 3
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 495
Index = 7
Left = 3315
TabIndex = 8
Top = 60
Width = 180
_ExtentX = 318
_ExtentY = 873
Enabled = 0 'False
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonAppearance= 1
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 8
Left = 4200
TabIndex = 9
ToolTipText = "系统帮助"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":27CEF
Check = -1 'True
End
Begin VBVsNetMenu.VsNetBut CmdTool
Height = 375
Index = 9
Left = 5160
TabIndex = 10
ToolTipText = "锁定系统"
Top = 120
Width = 615
_ExtentX = 1085
_ExtentY = 661
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Office2003Style = 0 'False
Caption = ""
ButtonPicture = "Frmmdimain.frx":285C9
PictureLayout = 7
Check = -1 'True
End
End
Begin WinXPC_Engine.WindowsXPC WinXPMain
Left = 1320
Top = 0
_ExtentX = 6588
_ExtentY = 1085
ColorScheme = 2
Common_Dialog = 0 'False
End
Begin VB.Menu mnuSysset
Caption = "系统设置(S)"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -