📄 frmdialupmanage.frm
字号:
VERSION 5.00
Object = "{86E75BE0-83F1-11CF-A8A0-444553540000}#1.0#0"; "CSRAS32.OCX"
Begin VB.Form frmDialupManage
AutoRedraw = -1 'True
ClientHeight = 4800
ClientLeft = 165
ClientTop = 450
ClientWidth = 7200
Icon = "frmDialupManage.frx":0000
LinkTopic = "Form1"
ScaleHeight = 320
ScaleMode = 3 'Pixel
ScaleWidth = 480
StartUpPosition = 3 '窗口缺省
Begin RasDialerCtrl.Dialer rasDialer
Left = 6705
Top = 4395
_Version = 65536
_ExtentX = 741
_ExtentY = 741
_StockProps = 0
AutoUpdate = -1 'True
Callback = 0 'False
CallbackNumber = ""
DialogState = 0
Interval = 1000
PhoneBook = ""
PhoneEntry = "2MB"
PhoneNumber = ""
Timeout = 60
UserDomain = ""
UserName = "hzhzazyz"
AutoConnect = 0 'False
AutoDisconnect = 0 'False
Blocking = 0 'False
End
Begin VB.CommandButton Command2
Caption = "参数设置(&S)"
Height = 375
Left = 5805
TabIndex = 45
Top = 1125
Width = 1290
End
Begin VB.CommandButton Command1
Caption = "连接上网(&D)"
Height = 360
Left = 5805
TabIndex = 44
Top = 375
Width = 1305
End
Begin VB.Timer Timer2
Enabled = 0 'False
Interval = 1000
Left = 3900
Top = -30
End
Begin VB.CommandButton Command4
Caption = "操作说明(&L)"
Height = 360
Left = 5820
TabIndex = 35
Top = 2700
Width = 1290
End
Begin VB.CommandButton Command5
Caption = "退出程序(&Q)"
Height = 360
Left = 5820
TabIndex = 34
Top = 3495
Width = 1290
End
Begin VB.CommandButton Command3
Caption = "查看记录(&V)"
Height = 360
Left = 5805
TabIndex = 33
Top = 1845
Width = 1290
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H80000006&
ForeColor = &H80000008&
Height = 3435
Left = 1800
ScaleHeight = 3405
ScaleWidth = 3900
TabIndex = 7
Top = 360
Width = 3930
Begin VB.TextBox Text4
BackColor = &H80000006&
ForeColor = &H000000FF&
Height = 270
Left = 1830
TabIndex = 42
Top = 3060
Width = 1920
End
Begin VB.TextBox Text3
BackColor = &H80000006&
ForeColor = &H000000FF&
Height = 270
Left = 1830
TabIndex = 41
Top = 2640
Width = 1905
End
Begin VB.ComboBox Combo1
BackColor = &H00000000&
ForeColor = &H000000FF&
Height = 300
Left = 1830
Style = 2 'Dropdown List
TabIndex = 40
Top = 2175
Width = 1905
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 2925
TabIndex = 39
Top = 1605
Width = 690
End
Begin VB.Label Label31
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 945
TabIndex = 38
Top = 1590
Width = 720
End
Begin VB.Label Label30
BackStyle = 0 'Transparent
Caption = "下载速度:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 1830
TabIndex = 37
Top = 1605
Width = 825
End
Begin VB.Label Label29
BackStyle = 0 'Transparent
Caption = "上载速度:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 75
TabIndex = 36
Top = 1620
Width = 825
End
Begin VB.Label Label28
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 2550
TabIndex = 32
Top = 1875
Width = 1320
End
Begin VB.Label Label27
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 690
TabIndex = 31
Top = 1875
Width = 1215
End
Begin VB.Label Label26
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 75
TabIndex = 30
Top = 3165
Width = 1350
End
Begin VB.Label Label11
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 90
TabIndex = 29
Top = 2760
Width = 1350
End
Begin VB.Label Label10
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 90
TabIndex = 28
Top = 2325
Width = 1350
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "本月用时:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 45
TabIndex = 27
Top = 2985
Width = 885
End
Begin VB.Label Label8
BackStyle = 0 'Transparent
Caption = "今日用时:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 60
TabIndex = 26
Top = 2520
Width = 945
End
Begin VB.Label Label7
BackStyle = 0 'Transparent
Caption = "本次用时:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 45
TabIndex = 25
Top = 2130
Width = 825
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "对外IP:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 1890
TabIndex = 24
Top = 1875
Width = 705
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "本机IP:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 75
TabIndex = 23
Top = 1875
Width = 705
End
Begin VB.Label lblType
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 180
Left = 2040
TabIndex = 22
Top = 765
Width = 1065
End
Begin VB.Label Label25
BackStyle = 0 'Transparent
Caption = "类型:"
ForeColor = &H00FFFFFF&
Height = 180
Left = 1515
TabIndex = 21
Top = 750
Width = 525
End
Begin VB.Label Label24
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
ForeColor = &H00FFFFFF&
Height = 225
Left = 2280
TabIndex = 20
Top = 1380
Width = 1410
End
Begin VB.Label Label23
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
ForeColor = &H00FFFFFF&
Height = 225
Left = 840
TabIndex = 19
Top = 1380
Width = 1110
End
Begin VB.Line Line3
BorderColor = &H00C0C000&
X1 = 2010
X2 = 2010
Y1 = 1305
Y2 = 1560
End
Begin VB.Line Line2
BorderColor = &H00C0C000&
X1 = 2265
X2 = 2625
Y1 = 1095
Y2 = 1095
End
Begin VB.Line Line1
BorderColor = &H00C0C000&
X1 = 1425
X2 = 1785
Y1 = 1095
Y2 = 1095
End
Begin VB.Label Label22
BackStyle = 0 'Transparent
Caption = "收到"
ForeColor = &H00FFFFFF&
Height = 225
Left = 2670
TabIndex = 18
Top = 1035
Width = 375
End
Begin VB.Label Label21
BackStyle = 0 'Transparent
Caption = "发送"
ForeColor = &H00FFFFFF&
Height = 225
Left = 1020
TabIndex = 17
Top = 1020
Width = 375
End
Begin VB.Label Label20
BackStyle = 0 'Transparent
Caption = "数据包:"
ForeColor = &H00FFFFFF&
Height = 225
Left = 135
TabIndex = 16
Top = 1185
Width = 705
End
Begin VB.Label Label19
BackStyle = 0 'Transparent
ForeColor = &H00C0C000&
Height = 210
Left = 720
TabIndex = 15
Top = 750
Width = 660
End
Begin VB.Label Label18
BackStyle = 0 'Transparent
Caption = "速度:"
ForeColor = &H00FFFFFF&
Height = 270
Left = 135
TabIndex = 14
Top = 750
Width = 525
End
Begin VB.Label Label17
BackStyle = 0 'Transparent
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -