📄 frmbrowser.frm
字号:
VERSION 5.00
Object = "{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}#1.1#0"; "SHDOCVW.DLL"
Begin VB.Form frmBrowser
Caption = "网站作弊器1.0"
ClientHeight = 6000
ClientLeft = 3045
ClientTop = 3630
ClientWidth = 9000
Icon = "frmBrowser.frx":0000
ScaleHeight = 6000
ScaleWidth = 9000
StartUpPosition = 2 'CenterScreen
WindowState = 2 'Maximized
Begin VB.PictureBox Picture2
Align = 2 'Align Bottom
Appearance = 0 'Flat
BackColor = &H8000000A&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 372
Left = 0
ScaleHeight = 375
ScaleWidth = 9000
TabIndex = 18
Top = 5625
Width = 9000
Begin VB.ComboBox Combo1
Height = 276
ItemData = "frmBrowser.frx":030A
Left = 1080
List = "frmBrowser.frx":0323
TabIndex = 21
Text = "10"
Top = 40
Width = 732
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "秒"
ForeColor = &H000000FF&
Height = 180
Left = 1920
TabIndex = 20
Top = 60
Width = 180
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "刷新频率："
ForeColor = &H000000FF&
Height = 180
Left = 180
TabIndex = 19
Top = 60
Width = 900
End
End
Begin VB.Timer Timer1
Enabled = 0 'False
Left = 5460
Top = 3120
End
Begin VB.PictureBox Picture1
Align = 1 'Align Top
Height = 792
Left = 0
ScaleHeight = 735
ScaleWidth = 8940
TabIndex = 4
Top = 0
Width = 9000
Begin VB.CommandButton Command12
Caption = "停止"
Height = 740
Left = 5960
Picture = "frmBrowser.frx":0343
Style = 1 'Graphical
TabIndex = 17
ToolTipText = "停止作弊"
Top = 0
Width = 740
End
Begin VB.CommandButton Command11
Caption = "作弊"
Height = 740
Left = 5210
Picture = "frmBrowser.frx":064D
Style = 1 'Graphical
TabIndex = 16
Top = 0
Width = 740
End
Begin VB.CommandButton Command10
Caption = "导航"
Height = 740
Left = 4460
Picture = "frmBrowser.frx":0957
Style = 1 'Graphical
TabIndex = 15
Top = 0
Width = 740
End
Begin VB.CommandButton Command9
Caption = "退出"
Height = 740
Left = 8210
Picture = "frmBrowser.frx":0C61
Style = 1 'Graphical
TabIndex = 13
Top = 0
Width = 740
End
Begin VB.CommandButton Command8
Caption = "帮助"
Height = 740
Left = 7460
Picture = "frmBrowser.frx":0F6B
Style = 1 'Graphical
TabIndex = 12
Top = 0
Width = 740
End
Begin VB.CommandButton Command7
Caption = "关于"
Height = 740
Left = 6710
Picture = "frmBrowser.frx":1275
Style = 1 'Graphical
TabIndex = 11
Top = 0
Width = 740
End
Begin VB.CommandButton Command1
Caption = "向后"
Height = 740
Left = 0
Picture = "frmBrowser.frx":157F
Style = 1 'Graphical
TabIndex = 10
Top = 0
Width = 740
End
Begin VB.CommandButton Command2
Caption = "向前"
Height = 740
Left = 740
Picture = "frmBrowser.frx":1889
Style = 1 'Graphical
TabIndex = 9
Top = 0
Width = 740
End
Begin VB.CommandButton Command3
Caption = "停止"
Height = 740
Left = 1490
Picture = "frmBrowser.frx":1B93
Style = 1 'Graphical
TabIndex = 8
Top = 0
Width = 740
End
Begin VB.CommandButton Command4
Caption = "刷新"
Height = 740
Left = 2230
Picture = "frmBrowser.frx":1C95
Style = 1 'Graphical
TabIndex = 7
Top = 0
Width = 740
End
Begin VB.CommandButton Command5
Caption = "首页"
Height = 740
Left = 2980
Picture = "frmBrowser.frx":1F9F
Style = 1 'Graphical
TabIndex = 6
Top = 0
Width = 740
End
Begin VB.CommandButton Command6
Caption = "搜索"
Height = 740
Left = 3720
Picture = "frmBrowser.frx":22A9
Style = 1 'Graphical
TabIndex = 5
Top = 0
Width = 740
End
End
Begin VB.Timer timTimer
Enabled = 0 'False
Interval = 5
Left = 6180
Top = 1500
End
Begin VB.PictureBox picAddress
Align = 1 'Align Top
BackColor = &H80000004&
BorderStyle = 0 'None
Height = 612
Left = 0
ScaleHeight = 615
ScaleWidth = 9000
TabIndex = 3
TabStop = 0 'False
Top = 792
Width = 9000
Begin VB.ComboBox cboAddress
Height = 276
Left = 45
TabIndex = 2
Top = 300
Width = 3795
End
Begin VB.Label lblAddress
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "地址(&A)："
ForeColor = &H00C00000&
Height = 180
Left = 48
TabIndex = 1
Tag = "地址(&A)："
Top = 60
Width = 828
End
End
Begin SHDocVwCtl.WebBrowser brwWebBrowser
Height = 3132
Left = 60
TabIndex = 0
Top = 1440
Width = 5388
ExtentX = 9504
ExtentY = 5524
ViewMode = 0
Offline = 0
Silent = 0
RegisterAsBrowser= 0
RegisterAsDropTarget= 1
AutoArrange = 0 'False
NoClientEdge = 0 'False
AlignLeft = 0 'False
NoWebView = 0 'False
HideFileNames = 0 'False
SingleClick = 0 'False
SingleSelection = 0 'False
NoFolders = 0 'False
Transparent = 0 'False
ViewID = "{0057D0E0-3573-11CF-AE69-08002B2E1262}"
Location = "res://C:\WINDOWS\SYSTEM\SHDOCLC.DLL/dnserror.htm#http:///"
End
Begin VB.PictureBox imlIcons
BackColor = &H80000005&
Height = 384
Left = 2796
ScaleHeight = 330
ScaleWidth = 900
TabIndex = 14
Top = 2376
Width = 960
End
Begin VB.Menu MNUCZ
Caption = "操作(&F)"
Begin VB.Menu MNUBACK
Caption = "向后"
Shortcut = ^B
End
Begin VB.Menu MNUFOR
Caption = "向前"
Shortcut = ^F
End
Begin VB.Menu MNUSTOP
Caption = "停止"
Shortcut = ^T
End
Begin VB.Menu MNUS
Caption = "刷新"
Shortcut = ^X
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -