main1.frm
来自「小区巡逻管理靠请系统。需要硬件支持才可以工作」· FRM 代码 · 共 1,674 行 · 第 1/5 页
FRM
1,674 行
TabIndex = 30
Top = 3465
Width = 2010
Begin VB.Label readover
Alignment = 2 'Center
Caption = "读 入 完 成"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 105
TabIndex = 31
Top = 210
Width = 1800
End
End
Begin VB.CommandButton cclearinf
Caption = "清除手机资料"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 540
Left = 210
TabIndex = 2
Top = 4200
Width = 2010
End
Begin VB.Frame Frame32
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 645
Left = 210
TabIndex = 28
Top = 4830
Width = 2010
Begin VB.Label clearover
Alignment = 2 'Center
Caption = "清 除 完 成"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 105
TabIndex = 29
Top = 210
Width = 1800
End
End
Begin VB.Frame Frame33
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 645
Left = 210
TabIndex = 26
Top = 5565
Width = 2010
Begin VB.Label Label35
Alignment = 2 'Center
Caption = "设 定 手 机"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 330
Left = 105
TabIndex = 27
Top = 210
Width = 1800
End
End
Begin VB.CommandButton csystime
Caption = "确 定 输 入"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 540
Left = 210
TabIndex = 3
Top = 6405
Width = 2010
End
End
Begin VB.Frame Frame34
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 6980
Left = 3180
TabIndex = 22
Top = 525
Width = 8070
Begin VB.TextBox tempid
Height = 390
Left = 300
TabIndex = 187
Text = "Text1"
Top = 2025
Visible = 0 'False
Width = 1965
End
Begin VB.ListBox Listname
Height = 5820
Left = 5650
TabIndex = 184
Top = 975
Width = 2115
End
Begin VB.ListBox Listdt
Height = 5820
Left = 2850
TabIndex = 183
Top = 975
Width = 2200
End
Begin VB.ListBox Listadd
Height = 5820
Left = 225
TabIndex = 182
Top = 975
Width = 2115
End
Begin VB.Frame Frame35
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 645
Left = 210
TabIndex = 23
Top = 210
Width = 7575
Begin VB.Label Label36
Caption = " 安置地点 日期 时间 人员姓名"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 330
Left = 105
TabIndex = 24
Top = 210
Width = 7365
End
End
End
Begin VB.CommandButton ctableprintsm
Caption = "报 表 列 印"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 540
Left = -66975
TabIndex = 20
Top = 825
Width = 3060
End
Begin VB.Frame Frame36
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 645
Left = -66975
TabIndex = 18
Top = 1425
Width = 3060
Begin VB.Label Label37
Alignment = 2 'Center
Caption = "异 动 说 明"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 105
TabIndex = 19
Top = 210
Width = 2850
End
End
Begin VB.CommandButton cmodify
Caption = "修 改"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 540
Left = -66975
TabIndex = 17
Top = 2850
Width = 1170
End
Begin VB.CommandButton cdecide
Caption = "确 定"
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 540
Left = -65100
TabIndex = 16
Top = 2850
Width = 1170
End
Begin VB.Frame Frame37
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 675
Left = -66975
TabIndex = 14
Top = 3450
Width = 3060
Begin VB.Label Label38
Alignment = 2 'Center
Caption = "标 题 文 字"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 435
Left = 105
TabIndex = 15
Top = 210
Width = 2850
End
End
Begin VB.Frame Frame38
Caption = "端口选择"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?