?? frmmdi.frm
字號:
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "COMCTL32.OCX"
Begin VB.MDIForm frmMDI
BackColor = &H00808000&
Caption = "考勤系統"
ClientHeight = 8310
ClientLeft = 165
ClientTop = 450
ClientWidth = 11880
Icon = "frmMDI.frx":0000
LinkTopic = "MDIForm1"
Picture = "frmMDI.frx":030A
StartUpPosition = 2 '屏幕中心
WindowState = 2 'Maximized
Begin ComctlLib.Toolbar tlbMain
Align = 1 'Align Top
Height = 750
Left = 0
TabIndex = 1
Top = 0
Width = 11880
_ExtentX = 20955
_ExtentY = 1323
ButtonWidth = 1455
ButtonHeight = 1164
Appearance = 1
ImageList = "imlToolbarIcons"
_Version = 327682
BeginProperty Buttons {0713E452-850A-101B-AFC0-4210102A8DA7}
NumButtons = 5
BeginProperty Button1 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "tbCollection"
Object.ToolTipText = "打卡數據采集"
Object.Tag = ""
ImageIndex = 2
EndProperty
BeginProperty Button2 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button3 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "tbLeave"
Object.ToolTipText = "請假登記"
Object.Tag = ""
ImageIndex = 3
EndProperty
BeginProperty Button4 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = ""
Object.Tag = ""
Style = 3
MixedState = -1 'True
EndProperty
BeginProperty Button5 {0713F354-850A-101B-AFC0-4210102A8DA7}
Key = "mClose"
Object.Tag = ""
ImageIndex = 1
EndProperty
EndProperty
End
Begin ComctlLib.StatusBar stbMain
Align = 2 'Align Bottom
Height = 360
Left = 0
TabIndex = 0
Top = 7950
Width = 11880
_ExtentX = 20955
_ExtentY = 635
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 5
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 2
Key = ""
Object.Tag = ""
Object.ToolTipText = "日期"
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 5
AutoSize = 2
TextSave = "16:36"
Key = ""
Object.Tag = ""
Object.ToolTipText = "時間"
EndProperty
BeginProperty Panel3 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 2
Text = "操作員"
TextSave = "操作員"
Key = "stbOperater"
Object.Tag = ""
Object.ToolTipText = "操作員"
EndProperty
BeginProperty Panel4 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Text = "操作級別"
TextSave = "操作級別"
Key = "stbLevel"
Object.Tag = ""
Object.ToolTipText = "操作級別"
EndProperty
BeginProperty Panel5 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 1
Object.Width = 10134
Text = "提示信息"
TextSave = "提示信息"
Key = "stbMsg"
Object.Tag = ""
Object.ToolTipText = "提示信息"
EndProperty
EndProperty
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ComctlLib.ImageList imlToolbarIcons
Left = 2265
Top = 1740
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 42
ImageHeight = 38
MaskColor = 12632256
_Version = 327682
BeginProperty Images {0713E8C2-850A-101B-AFC0-4210102A8DA7}
NumListImages = 3
BeginProperty ListImage1 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMDI.frx":E8C0
Key = ""
EndProperty
BeginProperty ListImage2 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMDI.frx":FC12
Key = ""
EndProperty
BeginProperty ListImage3 {0713E8C3-850A-101B-AFC0-4210102A8DA7}
Picture = "frmMDI.frx":10F64
Key = ""
EndProperty
EndProperty
End
Begin VB.Menu mnuFile
Caption = "文件(&F)"
Begin VB.Menu mnuFileReg
Caption = "登錄(&L)..."
End
Begin VB.Menu mnuFileBar1
Caption = "-"
End
Begin VB.Menu mnuFileExit
Caption = "退出(&X)"
End
End
Begin VB.Menu mnuEdit
Caption = "編輯(&E)"
Visible = 0 'False
Begin VB.Menu mnuEditCut
Caption = "剪切(&T)"
Shortcut = ^X
End
Begin VB.Menu mnuEditCopy
Caption = "復制(&C)"
Shortcut = ^C
End
Begin VB.Menu mnuEditPaste
Caption = "粘貼(&P)"
Shortcut = ^V
End
End
Begin VB.Menu mnuApp
Caption = "應用(&A)"
Begin VB.Menu mnuAppCollection
Caption = "打卡數據采集(&C)..."
End
Begin VB.Menu mnuAppBar1
Caption = "-"
End
Begin VB.Menu mnuAppDefine
Caption = "班次定義(&D)..."
End
Begin VB.Menu mnuAppPlan
Caption = "日常排班(&P)..."
End
Begin VB.Menu mnuAppChange
Caption = "調班換班(&H)..."
End
Begin VB.Menu mnuAppBar2
Caption = "-"
End
Begin VB.Menu mnuAppLeave
Caption = "請假登記(&L)..."
End
Begin VB.Menu mnuAppAbsent
Caption = "其他缺席登記(B)..."
End
End
Begin VB.Menu mnuGuard
Caption = "數據管理(&G)"
Begin VB.Menu mnuGuardBase
Caption = "基本數據管理(&B)..."
End
Begin VB.Menu mnuGuardEmployee
Caption = "員工管理(&E)..."
End
Begin VB.Menu mnuGuardBar1
Caption = "-"
End
Begin VB.Menu mnuGuardRight
Caption = "權限管理(&R)..."
End
Begin VB.Menu mnuGuardBar2
Caption = "-"
End
Begin VB.Menu mnuGuardLib
Caption = "數據庫管理..."
End
End
Begin VB.Menu mnuRep
Caption = "報表中心(&R)"
Begin VB.Menu mnuRepShift
Caption = "班次表(&S)..."
Visible = 0 'False
End
Begin VB.Menu mnuRepPlan
Caption = "排班表(&P)..."
Visible = 0 'False
End
Begin VB.Menu mnuRepDyn
Caption = "日動態考勤報表(&D)"
End
Begin VB.Menu mnuRepFlow
Caption = "打卡流水報表(&F)..."
End
Begin VB.Menu mnuRepBar1
Caption = "-"
End
Begin VB.Menu mnuRepKQ
Caption = "考勤明細報表(&K)..."
End
Begin VB.Menu mnuRepMonth
Caption = "考勤月報表(&M)..."
End
End
Begin VB.Menu mnuCard
Caption = "IC卡管理(&I)"
Begin VB.Menu mnuCardNew
Caption = "發新卡(&N)..."
End
Begin VB.Menu mnuCardChange
Caption = "更換IC卡(&C)..."
End
Begin VB.Menu mnuCardBar1
Caption = "-"
End
Begin VB.Menu mnuPowerOn
Caption = "上電"
End
Begin VB.Menu mnuPowerOff
Caption = "下電"
End
Begin VB.Menu mnuATR
Caption = "復位應答"
End
Begin VB.Menu mnuReadMain
Caption = "讀主存儲器"
End
Begin VB.Menu mnuReadProtect
Caption = "讀保護存儲器"
End
Begin VB.Menu mnuSecurity
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -