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

📄 dio.frm

📁 控制卡IO控制程序。买板的时候送的例程。有用到的快下
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Begin VB.Form DIO 
   Caption         =   "PCI8613_DIO"
   ClientHeight    =   8070
   ClientLeft      =   60
   ClientTop       =   450
   ClientWidth     =   6420
   LinkTopic       =   "Form1"
   ScaleHeight     =   8070
   ScaleWidth      =   6420
   StartUpPosition =   3  '窗口缺省
   Begin VB.CommandButton Command_ReadDI 
      Caption         =   "读取DI"
      Height          =   375
      Left            =   4320
      TabIndex        =   34
      Top             =   7320
      Width           =   1335
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关15"
      Enabled         =   0   'False
      Height          =   255
      Index           =   15
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   33
      Top             =   6600
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关14"
      Enabled         =   0   'False
      Height          =   255
      Index           =   14
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   32
      Top             =   6240
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关13"
      Enabled         =   0   'False
      Height          =   255
      Index           =   13
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   31
      Top             =   5880
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关12"
      Enabled         =   0   'False
      Height          =   255
      Index           =   12
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   30
      Top             =   5520
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关11"
      Enabled         =   0   'False
      Height          =   255
      Index           =   11
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   29
      Top             =   5160
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关10"
      Enabled         =   0   'False
      Height          =   255
      Index           =   10
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   28
      Top             =   4800
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关9"
      Enabled         =   0   'False
      Height          =   255
      Index           =   9
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   27
      Top             =   4440
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关8"
      Enabled         =   0   'False
      Height          =   255
      Index           =   8
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   26
      Top             =   4080
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关7"
      Enabled         =   0   'False
      Height          =   255
      Index           =   7
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   25
      Top             =   3720
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关6"
      Enabled         =   0   'False
      Height          =   255
      Index           =   6
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   24
      Top             =   3360
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关5"
      Enabled         =   0   'False
      Height          =   255
      Index           =   5
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   23
      Top             =   3000
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关4"
      Enabled         =   0   'False
      Height          =   255
      Index           =   4
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   22
      Top             =   2640
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关3"
      Enabled         =   0   'False
      Height          =   255
      Index           =   3
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   21
      Top             =   2280
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关2"
      Enabled         =   0   'False
      Height          =   255
      Index           =   2
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   20
      Top             =   1920
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关1"
      Enabled         =   0   'False
      Height          =   255
      Index           =   1
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   19
      Top             =   1560
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关15[关]"
      Height          =   255
      Index           =   15
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   18
      Top             =   6600
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关14[关]"
      Height          =   255
      Index           =   14
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   17
      Top             =   6240
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关13[关]"
      Height          =   255
      Index           =   13
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   16
      Top             =   5880
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关12[关]"
      Height          =   255
      Index           =   12
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   15
      Top             =   5520
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关11[关]"
      Height          =   255
      Index           =   11
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   14
      Top             =   5160
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关10[关]"
      Height          =   255
      Index           =   10
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   13
      Top             =   4800
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关9[关]"
      Height          =   255
      Index           =   9
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   12
      Top             =   4440
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关8[关]"
      Height          =   255
      Index           =   8
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   11
      Top             =   4080
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关7[关]"
      Height          =   255
      Index           =   7
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   10
      Top             =   3720
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关6[关]"
      Height          =   255
      Index           =   6
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   9
      Top             =   3360
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关5[关]"
      Height          =   255
      Index           =   5
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   8
      Top             =   3000
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关4[关]"
      Height          =   255
      Index           =   4
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   7
      Top             =   2640
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关3[关]"
      Height          =   255
      Index           =   3
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   6
      Top             =   2280
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关2[关]"
      Height          =   255
      Index           =   2
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   5
      Top             =   1920
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关1[关]"
      Height          =   255
      Index           =   1
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   4
      Top             =   1560
      Width           =   1095
   End
   Begin VB.CommandButton Command_DI 
      Caption         =   "开关0"
      Enabled         =   0   'False
      Height          =   255
      Index           =   0
      Left            =   4080
      Style           =   1  'Graphical
      TabIndex        =   3
      Top             =   1200
      Width           =   1095
   End
   Begin VB.CommandButton Command_DO 
      Caption         =   "开关0[关]"
      Height          =   255
      Index           =   0
      Left            =   1200
      Style           =   1  'Graphical
      TabIndex        =   2
      Top             =   1200
      Width           =   1095
   End
   Begin VB.Frame Frame2 
      Caption         =   "开关量输入状态"
      Height          =   6255
      Left            =   3600
      TabIndex        =   1
      Top             =   840
      Width           =   2055
   End
   Begin VB.Frame Frame1 
      Caption         =   "开关量输出控制"
      Height          =   6255
      Left            =   720
      TabIndex        =   0
      Top             =   840
      Width           =   2055
   End

⌨️ 快捷键说明

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