identifier.frm

来自「some thing about vb 6 for net」· FRM 代码 · 共 892 行 · 第 1/3 页

FRM
892
字号
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form frmLineInfo 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "Identifier Line Information"
   ClientHeight    =   5415
   ClientLeft      =   15
   ClientTop       =   585
   ClientWidth     =   8970
   Icon            =   "Identifier.frx":0000
   LinkTopic       =   "Form1"
   PaletteMode     =   1  'UseZOrder
   ScaleHeight     =   5415
   ScaleWidth      =   8970
   Begin VB.CheckBox chkDialing 
      Caption         =   "North American Dialing"
      Height          =   255
      Left            =   240
      TabIndex        =   45
      Top             =   3840
      Value           =   1  'Checked
      Width           =   1935
   End
   Begin VB.CommandButton Initialize 
      Caption         =   "Re-Initialize"
      Height          =   375
      Left            =   3840
      TabIndex        =   44
      Top             =   4800
      Width           =   1095
   End
   Begin VB.CheckBox chkHook 
      Caption         =   "On/Off Hook"
      Height          =   255
      Left            =   2040
      TabIndex        =   43
      Top             =   4560
      Value           =   1  'Checked
      Width           =   1695
   End
   Begin VB.CheckBox chkWatchdog 
      Caption         =   "Watchdog"
      Height          =   255
      Left            =   2040
      TabIndex        =   42
      Top             =   4200
      Value           =   1  'Checked
      Width           =   1695
   End
   Begin VB.CheckBox chkCallerID 
      Caption         =   "Caller ID"
      Height          =   255
      Left            =   240
      TabIndex        =   41
      Top             =   4200
      Value           =   1  'Checked
      Width           =   1695
   End
   Begin VB.CheckBox chkRingStop 
      Caption         =   "Ring Stop"
      Height          =   255
      Left            =   2040
      TabIndex        =   40
      Top             =   4920
      Width           =   1695
   End
   Begin VB.CheckBox chkRingStart 
      Caption         =   "Ring Start"
      Height          =   255
      Left            =   240
      TabIndex        =   39
      Top             =   4920
      Value           =   1  'Checked
      Width           =   1695
   End
   Begin VB.CheckBox chkDTMF 
      Caption         =   "DTMF Digits"
      Height          =   255
      Left            =   240
      TabIndex        =   38
      Top             =   4560
      Value           =   1  'Checked
      Width           =   1695
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   8
      Left            =   4050
      TabIndex        =   25
      Text            =   "Name"
      Top             =   2955
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   7
      Left            =   4050
      TabIndex        =   24
      Text            =   "Name"
      Top             =   2595
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   6
      Left            =   4050
      TabIndex        =   23
      Text            =   "Name"
      Top             =   2235
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   5
      Left            =   4050
      TabIndex        =   22
      Text            =   "Name"
      Top             =   1875
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   4
      Left            =   4050
      TabIndex        =   21
      Text            =   "Name"
      Top             =   1515
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   3
      Left            =   4050
      TabIndex        =   20
      Text            =   "Name"
      Top             =   1155
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   2
      Left            =   4050
      TabIndex        =   19
      Text            =   "Name"
      Top             =   795
      Width           =   1575
   End
   Begin VB.TextBox CallName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   1
      Left            =   4050
      TabIndex        =   18
      Text            =   "Name"
      Top             =   435
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   8
      Left            =   2370
      TabIndex        =   17
      Text            =   "Number"
      Top             =   2955
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   7
      Left            =   2370
      TabIndex        =   16
      Text            =   "Number"
      Top             =   2595
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   6
      Left            =   2370
      TabIndex        =   15
      Text            =   "Number"
      Top             =   2235
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   5
      Left            =   2370
      TabIndex        =   14
      Text            =   "Number"
      Top             =   1875
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   4
      Left            =   2370
      TabIndex        =   13
      Text            =   "Number"
      Top             =   1515
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   3
      Left            =   2370
      TabIndex        =   12
      Text            =   "Number"
      Top             =   1155
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   2
      Left            =   2370
      TabIndex        =   11
      Text            =   "Number"
      Top             =   795
      Width           =   1575
   End
   Begin VB.TextBox Number 
      Enabled         =   0   'False
      Height          =   285
      Index           =   1
      Left            =   2370
      TabIndex        =   10
      Text            =   "Number"
      Top             =   435
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   7
      Left            =   690
      TabIndex        =   9
      Text            =   "Status"
      Top             =   2595
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   6
      Left            =   690
      TabIndex        =   8
      Text            =   "Status"
      Top             =   2235
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   5
      Left            =   690
      TabIndex        =   7
      Text            =   "Status"
      Top             =   1875
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   4
      Left            =   690
      TabIndex        =   6
      Text            =   "Status"
      Top             =   1515
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   3
      Left            =   690
      TabIndex        =   5
      Text            =   "Status"
      Top             =   1155
      Width           =   1575
   End
   Begin VB.TextBox Status 
      Enabled         =   0   'False
      Height          =   285
      Index           =   8

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?