frmsettings.frm

adsl拨号工具 有很多功能 不错啊 大家试试

VERSION 5.00
Object = "{86E75BE0-83F1-11CF-A8A0-444553540000}#1.0#0"; "CSRAS32.OCX"
Begin VB.Form FrmSettings 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "参数设置"
   ClientHeight    =   4590
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   6765
   LinkTopic       =   "FrmSettings"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4590
   ScaleWidth      =   6765
   ShowInTaskbar   =   0   'False
   StartUpPosition =   3  '窗口缺省
   Begin RasDialerCtrl.Dialer rasDialer 
      Left            =   6705
      Top             =   3780
      _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 Command6 
      Caption         =   "退出"
      Height          =   270
      Left            =   5415
      TabIndex        =   28
      Top             =   4245
      Width           =   1170
   End
   Begin VB.Frame Frame1 
      Height          =   4155
      Left            =   150
      TabIndex        =   3
      Top             =   0
      Width           =   6465
      Begin VB.Frame Frame2 
         Caption         =   "用户信息"
         Height          =   1410
         Left            =   90
         TabIndex        =   17
         Top             =   120
         Width           =   6300
         Begin VB.TextBox Text3 
            Height          =   270
            Left            =   960
            TabIndex        =   24
            Top             =   180
            Width           =   1800
         End
         Begin VB.TextBox Text4 
            Height          =   270
            IMEMode         =   3  'DISABLE
            Left            =   960
            PasswordChar    =   "*"
            TabIndex        =   23
            Top             =   465
            Width           =   1785
         End
         Begin VB.TextBox Text5 
            Height          =   270
            IMEMode         =   3  'DISABLE
            Left            =   975
            PasswordChar    =   "*"
            TabIndex        =   22
            Top             =   750
            Width           =   1785
         End
         Begin VB.CheckBox Check1 
            Caption         =   "设该用户为超级管理员权限"
            Height          =   270
            Left            =   975
            TabIndex        =   21
            Top             =   1065
            Width           =   2520
         End
         Begin VB.ListBox List2 
            Height          =   780
            Left            =   3060
            TabIndex        =   20
            Top             =   180
            Width           =   3135
         End
         Begin VB.CommandButton Command1 
            Caption         =   "增加(&Z)"
            Height          =   285
            Left            =   4125
            TabIndex        =   19
            Top             =   1020
            Width           =   930
         End
         Begin VB.CommandButton Command2 
            Caption         =   "删除(&D)"
            Height          =   285
            Left            =   5265
            TabIndex        =   18
            Top             =   1020
            Width           =   930
         End
         Begin VB.Label Label4 
            Caption         =   "名称(&U)："
            Height          =   210
            Left            =   135
            TabIndex        =   27
            Top             =   225
            Width           =   855
         End
         Begin VB.Label Label5 
            Caption         =   "口令(&L)："
            Height          =   240
            Left            =   150
            TabIndex        =   26
            Top             =   495
            Width           =   930
         End
         Begin VB.Label Label6 
            Caption         =   "确认(&G)："
            Height          =   240
            Left            =   150
            TabIndex        =   25
            Top             =   795
            Width           =   840
         End
      End
      Begin VB.Frame Frame4 
         Caption         =   "拨号成功后自动启动的选项"
         Height          =   1125
         Left            =   90
         TabIndex        =   9
         Top             =   1815
         Width           =   6300
         Begin VB.CheckBox Check2 
            Caption         =   "直接连接到本程序的网址"
            Height          =   255
            Left            =   1080
            TabIndex        =   14
            Top             =   825
            Width           =   2400
         End
         Begin VB.TextBox Text8 
            Height          =   285
            Left            =   1065
            TabIndex        =   13
            Top             =   540
            Width           =   5055
         End
         Begin VB.TextBox Text9 
            Height          =   270
            Left            =   1065
            TabIndex        =   12
            Top             =   225
            Width           =   3960
         End
         Begin VB.CommandButton Command10 
            Caption         =   "浏览..."
            Height          =   270
            Left            =   5190
            TabIndex        =   11
            Top             =   225
            Width           =   930
         End
         Begin VB.CheckBox Check3 
            Caption         =   "网速流量实时显示"
            Height          =   180
            Left            =   3570
            TabIndex        =   10
            Top             =   855
            Width           =   2250
         End
         Begin VB.Label Label7 
            Caption         =   "运行程序:"
            Height          =   240
            Left            =   165
            TabIndex        =   16
            Top             =   285
            Width           =   900
         End
         Begin VB.Label Label8 
            Caption         =   "进入网页:"
            Height          =   270
            Left            =   180
            TabIndex        =   15
            Top             =   570
            Width           =   855
         End
      End
      Begin VB.Frame Frame5 
         Caption         =   "安全参数设置"
         Height          =   765
         Left            =   90