📄 frmmain.frm
字号:
End
Begin VB.CommandButton cmdFind
Caption = "统计报表"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 0
TabIndex = 9
Top = 2280
Width = 2655
End
Begin VB.CommandButton cmdContral
Caption = "机房监控"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 0
TabIndex = 8
Top = 1800
Width = 2655
End
Begin VB.CommandButton cmddegree
Caption = "日常处理"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 0
TabIndex = 7
Top = 1320
Width = 2655
End
Begin VB.CommandButton CmdDate
Caption = "基础数据管理"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 0
TabIndex = 6
Top = 840
Width = 2655
End
Begin VB.CommandButton CmdSys
Caption = "系统管理"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 500
Left = 0
TabIndex = 5
Top = 400
Width = 2655
End
Begin MSComctlLib.ListView lvwPerson
Height = 2300
Left = 0
TabIndex = 1
Top = 5660
Width = 12255
_ExtentX = 21616
_ExtentY = 4075
LabelWrap = -1 'True
HideSelection = -1 'True
FullRowSelect = -1 'True
HotTracking = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin MSComctlLib.StatusBar SbaMain
Align = 2 'Align Bottom
Height = 420
Left = 0
TabIndex = 0
Top = 5835
Width = 7785
_ExtentX = 13732
_ExtentY = 741
_Version = 393216
BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628}
NumPanels = 5
BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628}
AutoSize = 1
Object.Width = 628
MinWidth = 19
Text = "就绪"
TextSave = "就绪"
Key = "Normal"
EndProperty
BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 1493
MinWidth = 884
Key = "UserInfo"
EndProperty
BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 4913
MinWidth = 4304
Key = "ShangJiInfo"
EndProperty
BeginProperty Panel4 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Alignment = 1
AutoSize = 1
Object.Width = 4490
MinWidth = 3881
Key = "Date"
EndProperty
BeginProperty Panel5 {8E3867AB-8586-11D1-B16A-00C0F0283628}
Style = 5
AutoSize = 1
Object.Width = 1491
MinWidth = 882
Picture = "frmmain.frx":14696
TextSave = "9:41"
Key = "Time"
EndProperty
EndProperty
End
Begin VB.Label lblCH_Memo
AutoSize = -1 'True
Caption = "持卡人描述："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 3600
TabIndex = 33
Top = 3600
Width = 1440
End
Begin VB.Label lblCPT_IDList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 7800
TabIndex = 32
Top = 2640
Width = 120
End
Begin VB.Label lblCPT_ID
AutoSize = -1 'True
Caption = "计算机ID："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 6360
TabIndex = 31
Top = 2640
Width = 1200
End
Begin VB.Label lblStart_TimeList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 4920
TabIndex = 30
Top = 3120
Width = 120
End
Begin VB.Label lblStart_Time
AutoSize = -1 'True
Caption = "上机时间："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 3600
TabIndex = 29
Top = 3120
Width = 1200
End
Begin VB.Label lblMoneyList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 4920
TabIndex = 28
Top = 2640
Width = 120
End
Begin VB.Label lblMoney
AutoSize = -1 'True
Caption = "金额："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 3600
TabIndex = 27
Top = 2640
Width = 720
End
Begin VB.Label lblShjiTypeList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 7800
TabIndex = 26
Top = 3120
Width = 120
End
Begin VB.Label lblShjiType
AutoSize = -1 'True
Caption = "上机方式："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 6360
TabIndex = 25
Top = 3120
Width = 1200
End
Begin VB.Label lblST_NameList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 7800
TabIndex = 24
Top = 1200
Width = 120
End
Begin VB.Label lblST_Name
AutoSize = -1 'True
Caption = "类别："
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 6360
TabIndex = 23
Top = 1200
Width = 720
End
Begin VB.Label lblC_IDList
AutoSize = -1 'True
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Left = 7800
TabIndex = 22
Top = 2160
Width = 120
End
Begin VB.Label lblC_ID
AutoSize = -1 'True
Caption = "班级："
BeginProperty Font
Name = "宋体"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -