form1.frm

opc client, visual basic opc clien for modbus

VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   6360
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   5625
   LinkTopic       =   "Form1"
   ScaleHeight     =   6360
   ScaleWidth      =   5625
   StartUpPosition =   3  'Windows 偺婛掕抣
   Begin VB.ComboBox ServerName 
      Height          =   300
      Left            =   120
      TabIndex        =   43
      Top             =   360
      Width           =   1935
   End
   Begin VB.CommandButton ADVISE_Button 
      Caption         =   "Auto Read On"
      Enabled         =   0   'False
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   9
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   375
      Left            =   3960
      TabIndex        =   42
      Top             =   360
      Width           =   1455
   End
   Begin VB.TextBox UpdateRateSet 
      Height          =   375
      Left            =   1200
      TabIndex        =   39
      Text            =   "1000"
      Top             =   1080
      Width           =   615
   End
   Begin VB.CommandButton WRITE_Button 
      Caption         =   "Write"
      Enabled         =   0   'False
      BeginProperty Font 
         Name            =   "Arial"
         Size            =   9
         Charset         =   0
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      Height          =   375
      Left            =   3960
      TabIndex        =   34
      Top             =   1560
      Width           =   1455
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   7
      Left            =   240
      TabIndex        =   33
      Top             =   5760
      Width           =   1095
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   6
      Left            =   240
      TabIndex        =   32
      Top             =   5280
      Width           =   1095
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   7
      Left            =   1560
      TabIndex        =   31
      Text            =   "Value"
      Top             =   5760
      Width           =   735
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   7
      Left            =   2520
      TabIndex        =   30
      Text            =   "Text1"
      Top             =   5760
      Width           =   1935
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   7
      Left            =   4560
      TabIndex        =   29
      Text            =   "Text1"
      Top             =   5760
      Width           =   615
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   6
      Left            =   4560
      TabIndex        =   28
      Text            =   "Text1"
      Top             =   5280
      Width           =   615
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   6
      Left            =   2520
      TabIndex        =   27
      Text            =   "Text1"
      Top             =   5280
      Width           =   1935
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   6
      Left            =   1560
      TabIndex        =   26
      Text            =   "Value"
      Top             =   5280
      Width           =   735
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   5
      Left            =   240
      TabIndex        =   25
      Top             =   4800
      Width           =   1095
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   4
      Left            =   240
      TabIndex        =   24
      Top             =   4320
      Width           =   1095
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   5
      Left            =   1560
      TabIndex        =   23
      Text            =   "Value"
      Top             =   4800
      Width           =   735
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   5
      Left            =   2520
      TabIndex        =   22
      Text            =   "Text1"
      Top             =   4800
      Width           =   1935
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   5
      Left            =   4560
      TabIndex        =   21
      Text            =   "Text1"
      Top             =   4800
      Width           =   615
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   4
      Left            =   4560
      TabIndex        =   20
      Text            =   "Text1"
      Top             =   4320
      Width           =   615
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   4
      Left            =   2520
      TabIndex        =   19
      Text            =   "Text1"
      Top             =   4320
      Width           =   1935
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   4
      Left            =   1560
      TabIndex        =   18
      Text            =   "Value"
      Top             =   4320
      Width           =   735
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   3
      Left            =   240
      TabIndex        =   17
      Top             =   3840
      Width           =   1095
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   2
      Left            =   240
      TabIndex        =   16
      Top             =   3360
      Width           =   1095
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   3
      Left            =   1560
      TabIndex        =   15
      Text            =   "Value"
      Top             =   3840
      Width           =   735
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   3
      Left            =   2520
      TabIndex        =   14
      Text            =   "Text1"
      Top             =   3840
      Width           =   1935
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   3
      Left            =   4560
      TabIndex        =   13
      Text            =   "Text1"
      Top             =   3840
      Width           =   615
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   2
      Left            =   4560
      TabIndex        =   12
      Text            =   "Text1"
      Top             =   3360
      Width           =   615
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   2
      Left            =   2520
      TabIndex        =   11
      Text            =   "Text1"
      Top             =   3360
      Width           =   1935
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   2
      Left            =   1560
      TabIndex        =   10
      Text            =   "Value"
      Top             =   3360
      Width           =   735
   End
   Begin VB.TextBox ItemName 
      Height          =   375
      Index           =   1
      Left            =   240
      TabIndex        =   9
      Top             =   2880
      Width           =   1095
   End
   Begin VB.TextBox Value 
      Height          =   375
      Index           =   1
      Left            =   1560
      TabIndex        =   8
      Text            =   "Value"
      Top             =   2880
      Width           =   735
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   1
      Left            =   2520
      TabIndex        =   7
      Text            =   "Text1"
      Top             =   2880
      Width           =   1935
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   1
      Left            =   4560
      TabIndex        =   6
      Text            =   "Text1"
      Top             =   2880
      Width           =   615
   End
   Begin VB.TextBox Quality 
      Height          =   375
      Index           =   0
      Left            =   4560
      TabIndex        =   5
      Text            =   "Text1"
      Top             =   2400
      Width           =   615
   End
   Begin VB.TextBox Time 
      Height          =   375
      Index           =   0
      Left            =   2520
      TabIndex        =   4
      Text            =   "Text1"
      Top             =   2400
      Width           =   1935
   End
   Begin VB.TextBox Value