frmalert.frm
来自「支持监控包括传输控制协议和 UDP 的所有的互联网传输协议。同时程序具有实时文件」· FRM 代码 · 共 628 行 · 第 1/2 页
FRM
628 行
VERSION 5.00
Begin VB.Form frmAlert
Appearance = 0 'Flat
AutoRedraw = -1 'True
BackColor = &H80000005&
BorderStyle = 1 'Fixed Single
Caption = "防火墙提示"
ClientHeight = 6750
ClientLeft = 8250
ClientTop = 2160
ClientWidth = 6015
Icon = "frmAlert.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
Picture = "frmAlert.frx":058A
ScaleHeight = 450
ScaleMode = 3 'Pixel
ScaleWidth = 401
ShowInTaskbar = 0 'False
StartUpPosition = 1 '所有者中心
Begin VB.PictureBox Picture2
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 240
Left = 5640
Picture = "frmAlert.frx":A079
ScaleHeight = 240
ScaleWidth = 240
TabIndex = 18
ToolTipText = "隐藏详细帮助"
Top = 6480
Width = 240
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 3
Left = 5280
Picture = "frmAlert.frx":A20C
ScaleHeight = 240
ScaleWidth = 240
TabIndex = 15
ToolTipText = "建议帮助信息"
Top = 3360
Width = 240
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 2
Left = 5640
Picture = "frmAlert.frx":A5C9
ScaleHeight = 240
ScaleWidth = 240
TabIndex = 14
ToolTipText = "程序信息帮助"
Top = 2280
Width = 240
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 1
Left = 5640
Picture = "frmAlert.frx":A986
ScaleHeight = 240
ScaleWidth = 240
TabIndex = 13
ToolTipText = "公用程序端口详细帮助"
Top = 1200
Width = 240
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 240
Index = 0
Left = 5640
Picture = "frmAlert.frx":AD43
ScaleHeight = 240
ScaleWidth = 240
TabIndex = 12
ToolTipText = "详细帮助"
Top = 120
Width = 240
End
Begin VB.PictureBox picNotSafe
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H80000001&
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 765
Index = 2
Left = 5640
Picture = "frmAlert.frx":B100
ScaleHeight = 765
ScaleWidth = 285
TabIndex = 11
ToolTipText = "该程序是安全的可以允许运行!"
Top = 3480
Width = 285
End
Begin VB.PictureBox picNotSafe
Appearance = 0 'Flat
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 765
Index = 1
Left = 5640
Picture = "frmAlert.frx":BD37
ScaleHeight = 765
ScaleWidth = 285
TabIndex = 10
Top = 3480
Width = 285
End
Begin VB.PictureBox picNotSafe
Appearance = 0 'Flat
AutoSize = -1 'True
BorderStyle = 0 'None
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 765
Index = 0
Left = 5640
Picture = "frmAlert.frx":C99F
ScaleHeight = 765
ScaleWidth = 285
TabIndex = 9
Top = 3480
Width = 285
End
Begin VB.CheckBox Check1
Appearance = 0 'Flat
BackColor = &H80000005&
DownPicture = "frmAlert.frx":D5FA
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 300
Left = 240
Picture = "frmAlert.frx":D73B
Style = 1 'Graphical
TabIndex = 1
Top = 4485
Width = 300
End
Begin OnIt_Pro_Firewall.CandyButton Command2
Height = 375
Left = 4560
TabIndex = 20
Top = 4440
Width = 1095
_extentx = 1931
_extenty = 661
font = "frmAlert.frx":D895
caption = "阻止"
captionhighlitecolor= 0
iconhighlitecolor= 0
checked = 0 'False
colorbuttonhover= 14704640
colorbuttonup = 13668448
colorbuttondown = 11108432
colorbright = 16775930
borderbrightness= 0
displayhand = 0 'False
colorscheme = 2
End
Begin OnIt_Pro_Firewall.CandyButton Command1
Height = 375
Left = 3360
TabIndex = 21
Top = 4440
Width = 1095
_extentx = 1931
_extenty = 661
font = "frmAlert.frx":D8B9
caption = "允许"
captionhighlitecolor= 0
iconhighlitecolor= 0
checked = 0 'False
colorbuttonhover= 14704640
colorbuttonup = 13668448
colorbuttondown = 11108432
colorbright = 16775930
borderbrightness= 0
displayhand = 0 'False
colorscheme = 2
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "记住我的回答,下次不再提醒."
Height = 210
Left = 600
TabIndex = 19
Top = 4560
Width = 2535
End
Begin VB.Label Label5
AutoSize = -1 'True
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Left = 360
TabIndex = 17
Top = 4920
Width = 45
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
BeginProperty Font
Name = "Tahoma"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?