⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 kepserverex_simple_vb_opc.frm

📁 Simple OPC client,值得研究。
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Begin VB.Form SimpleOPCInterface 
   Caption         =   "ATCE OPC Client"
   ClientHeight    =   7380
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   10290
   LinkTopic       =   "Form1"
   ScaleHeight     =   7380
   ScaleWidth      =   10290
   StartUpPosition =   3  'Windows Default
   Begin VB.PictureBox Picture1 
      Height          =   855
      Left            =   8280
      Picture         =   "KEPServerEX_Simple_VB_OPC.frx":0000
      ScaleHeight     =   795
      ScaleWidth      =   1755
      TabIndex        =   98
      Top             =   960
      Width           =   1815
   End
   Begin VB.TextBox OPCItemName 
      Enabled         =   0   'False
      Height          =   285
      Index           =   4
      Left            =   120
      TabIndex        =   97
      ToolTipText     =   "Enter an OPC Item name in the form of ServerBranch.ServerItem"
      Top             =   5040
      Width           =   2775
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   9
      Left            =   8160
      TabIndex        =   91
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   6840
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   8
      Left            =   8160
      TabIndex        =   90
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   6480
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   7
      Left            =   8160
      TabIndex        =   89
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   6120
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   6
      Left            =   8160
      TabIndex        =   88
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   5760
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   5
      Left            =   8160
      TabIndex        =   87
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   5400
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   4
      Left            =   8160
      TabIndex        =   86
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   5040
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   3
      Left            =   8160
      TabIndex        =   85
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   4680
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   2
      Left            =   8160
      TabIndex        =   84
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   4320
      Width           =   975
   End
   Begin VB.CommandButton OPCItemSyncReadButton 
      Caption         =   "Sync Read"
      Enabled         =   0   'False
      Height          =   255
      Index           =   1
      Left            =   8160
      TabIndex        =   83
      ToolTipText     =   "Click here to perform a Synchronous read of this OPC Item"
      Top             =   3960
      Width           =   975
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   9
      Left            =   7200
      TabIndex        =   81
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   6840
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   8
      Left            =   7200
      TabIndex        =   80
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   6480
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   7
      Left            =   7200
      TabIndex        =   79
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   6120
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   6
      Left            =   7200
      TabIndex        =   78
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   5760
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   5
      Left            =   7200
      TabIndex        =   77
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   5400
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   4
      Left            =   7200
      TabIndex        =   76
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   5040
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   3
      Left            =   7200
      TabIndex        =   75
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   4680
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   2
      Left            =   7200
      TabIndex        =   74
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   4320
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CheckBox OPCItemActiveState 
      Alignment       =   1  'Right Justify
      Caption         =   "Active"
      Enabled         =   0   'False
      Height          =   255
      Index           =   1
      Left            =   7200
      TabIndex        =   73
      ToolTipText     =   "Click here to change the active state of this item"
      Top             =   3960
      Value           =   1  'Checked
      Width           =   855
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   9
      Left            =   6120
      TabIndex        =   72
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   6840
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   8
      Left            =   6120
      TabIndex        =   71
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   6480
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   7
      Left            =   6120
      TabIndex        =   70
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   6120
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   6
      Left            =   6120
      TabIndex        =   69
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   5760
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   5
      Left            =   6120
      TabIndex        =   68
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   5400
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   4
      Left            =   6120
      TabIndex        =   67
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   5040
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   3
      Left            =   6120
      TabIndex        =   66
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   4680
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 
      Caption         =   "Write Value"
      Enabled         =   0   'False
      Height          =   255
      Index           =   2
      Left            =   6120
      TabIndex        =   65
      ToolTipText     =   "Click here to send the value entered in the 'Value to Write' field"
      Top             =   4320
      Width           =   975
   End
   Begin VB.CommandButton OPCItemWriteButton 

⌨️ 快捷键说明

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