📄 frmmain.frm
字号:
TabIndex = 149
Top = 960
Value = 1 'Checked
Width = 1575
End
Begin VB.TextBox txtLastcard
BackColor = &H8000000F&
Enabled = 0 'False
Height = 345
Left = 360
TabIndex = 137
Top = 600
Width = 1695
End
Begin VB.CheckBox ckLastcard
Caption = "监控刷卡号"
Height = 255
Left = 360
TabIndex = 136
Top = 360
Value = 1 'Checked
Width = 1455
End
Begin VB.CommandButton cmdStart
Caption = "启动"
Height = 375
Left = 360
TabIndex = 135
Tag = "0"
Top = 1800
Width = 1455
End
End
Begin VB.Frame Frame4
Caption = "控制设备"
Height = 2295
Left = -72240
TabIndex = 129
Top = 2880
Width = 4455
Begin VB.CommandButton cmd3
Caption = "错误灯亮,蜂鸣器响三声"
Height = 375
Left = 1800
TabIndex = 133
Top = 1440
Width = 2415
End
Begin VB.CommandButton cmd2
Caption = "启动警报器"
Height = 375
Left = 240
TabIndex = 132
Tag = "0"
Top = 1440
Width = 1215
End
Begin VB.CommandButton ccmd1
Caption = "正常灯亮,蜂鸣器响一声"
Height = 375
Left = 1800
TabIndex = 131
Top = 600
Width = 2415
End
Begin VB.CommandButton cmd0
Caption = "开门"
Height = 375
Left = 240
TabIndex = 130
Tag = "0"
Top = 600
Width = 1215
End
End
Begin VB.Frame Frame2
Caption = "设备显示"
Height = 4695
Left = -74880
TabIndex = 119
Top = 480
Width = 2220
Begin VB.TextBox txtDay
Height = 315
Left = 600
TabIndex = 128
Text = "1"
Top = 2940
Width = 1455
End
Begin VB.CommandButton cmdBrush
Caption = "刷卡显示"
Height = 375
Left = 1035
TabIndex = 126
Top = 4065
Width = 975
End
Begin VB.CommandButton cmdNormal
Caption = "正常显示"
Height = 375
Left = 75
TabIndex = 125
Top = 4065
Width = 945
End
Begin VB.TextBox txtShowOn
Height = 405
Left = 120
TabIndex = 124
Top = 3360
Width = 1935
End
Begin VB.CheckBox ckWordwarp
Caption = "自动换行"
Height = 195
Left = 120
TabIndex = 123
Top = 2400
Value = 1 'Checked
Width = 1575
End
Begin VB.CheckBox ckClear
Caption = "清屏"
Height = 255
Left = 120
TabIndex = 122
Top = 2640
Value = 1 'Checked
Width = 1095
End
Begin VB.CommandButton cmdShow
Caption = "显示消息"
Height = 375
Left = 840
TabIndex = 121
Top = 1920
Width = 1215
End
Begin VB.TextBox txtMsg
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1455
Left = 225
MaxLength = 4080
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 120
Top = 240
Width = 1785
End
Begin VB.Label Label26
Caption = "保留"
Height = 255
Left = 120
TabIndex = 127
Top = 3000
Width = 615
End
End
Begin VB.CommandButton cmdVer
Caption = "软件版本(&V)"
Height = 375
Left = 5685
TabIndex = 118
Top = 4905
Width = 1695
End
Begin VB.CommandButton cmdClearAll
Caption = "清除(&C)"
Height = 375
Left = -70560
TabIndex = 115
Top = 3780
Width = 1600
End
Begin VB.CommandButton cmdWritedev
Caption = "写设备(&W)"
Height = 375
Left = -70560
TabIndex = 114
Top = 1980
Width = 1600
End
Begin VB.CommandButton cmdReaddev
Caption = "读设备(&R)"
Height = 375
Left = -70560
TabIndex = 113
Top = 1380
Width = 1600
End
Begin VB.CommandButton cmdDel
Caption = "删除名单(&D)"
Height = 375
Left = -70560
TabIndex = 112
Top = 3180
Width = 1600
End
Begin VB.CommandButton cmdAdd
Caption = "增加名单(&A)"
Height = 375
Left = -70560
TabIndex = 111
Top = 2580
Width = 1600
End
Begin TabDlg.SSTab SSTab1
Height = 4995
Left = -74955
TabIndex = 68
Top = 360
Width = 7455
_ExtentX = 13150
_ExtentY = 8811
_Version = 393216
Tab = 2
TabHeight = 520
TabCaption(0) = "运行模式"
TabPicture(0) = "frmMain.frx":019E
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame11"
Tab(0).Control(1)= "Frame9"
Tab(0).Control(2)= "Frame10"
Tab(0).Control(3)= "Frame8"
Tab(0).Control(4)= "Frame7"
Tab(0).ControlCount= 5
TabCaption(1) = "IC卡"
TabPicture(1) = "frmMain.frx":01BA
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "FramGroup"
Tab(1).ControlCount= 1
TabCaption(2) = "其它"
TabPicture(2) = "frmMain.frx":01D6
Tab(2).ControlEnabled= -1 'True
Tab(2).Control(0)= "frm"
Tab(2).Control(0).Enabled= 0 'False
Tab(2).Control(1)= "Frame6"
Tab(2).Control(1).Enabled= 0 'False
Tab(2).Control(2)= "Frame12"
Tab(2).Control(2).Enabled= 0 'False
Tab(2).Control(3)= "Frame13"
Tab(2).Control(3).Enabled= 0 'False
Tab(2).ControlCount= 4
Begin VB.Frame Frame13
Caption = "打铃时间"
Height = 2775
Left = 3720
TabIndex = 164
Top = 2040
Width = 3615
Begin VB.CommandButton cmdRewriteRiingTime
Caption = "重新写入"
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2280
TabIndex = 168
Top = 2280
Width = 1095
End
Begin VB.CommandButton cmdDelRingTime
Caption = "删除"
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1200
TabIndex = 167
Top = 2280
Width = 975
End
Begin VB.CommandButton cmdAddRingTime
Caption = "增加"
BeginProperty Font
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 166
Top = 2280
Width = 975
End
Begin MSComctlLib.ListView lvRingTime
Height = 1860
Left = 105
TabIndex = 165
Top = 300
Width = 3375
_ExtentX = 5953
_ExtentY = 3281
View = 3
LabelEdit = 1
LabelWrap = -1 'True
HideSelection = 0 'False
FullRowSelect = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = -2147483643
BorderStyle = 1
Appearance = 1
NumItems = 0
End
End
Begin VB.Frame Frame12
Height = 2775
Left = 120
TabIndex = 158
Top = 2040
Width = 3495
Begin VB.CommandButton cmdReWriteClockTime
Caption = "重新写入"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2280
TabIndex = 163
Top = 2280
Width = 1095
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -