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

📄 form1.frm

📁 多功能数据采集卡上位机完整代码
💻 FRM
📖 第 1 页 / 共 5 页
字号:
         _ExtentY        =   529
         Caption         =   "14"
         Style           =   2
         AllValue        =   ""
         BackColor0      =   128
         BackColor1      =   255
         ForeColor1      =   8454143
         Caption_Left    =   60
         Caption_Top     =   52
         Caption_Width   =   180
         Caption_Height  =   195
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "Microsoft Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin Ledocx.Led ledDI 
         Height          =   300
         Index           =   14
         Left            =   690
         TabIndex        =   65
         Top             =   1800
         Width           =   300
         _ExtentX        =   529
         _ExtentY        =   529
         Caption         =   "15"
         Style           =   2
         AllValue        =   ""
         BackColor0      =   128
         BackColor1      =   255
         ForeColor1      =   8454143
         Caption_Left    =   60
         Caption_Top     =   52
         Caption_Width   =   180
         Caption_Height  =   195
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "Microsoft Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin Ledocx.Led ledDI 
         Height          =   300
         Index           =   15
         Left            =   285
         TabIndex        =   66
         Top             =   1800
         Width           =   300
         _ExtentX        =   529
         _ExtentY        =   529
         Caption         =   "16"
         Style           =   2
         AllValue        =   ""
         BackColor0      =   128
         BackColor1      =   255
         ForeColor1      =   8454143
         Caption_Left    =   60
         Caption_Top     =   52
         Caption_Width   =   180
         Caption_Height  =   195
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "Microsoft Sans Serif"
            Size            =   8.25
            Charset         =   0
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
   End
   Begin VB.Frame Frame5 
      Caption         =   "计数器:"
      Height          =   2265
      Left            =   150
      TabIndex        =   15
      Top             =   6120
      Width           =   5985
      Begin VB.CommandButton cmdCT 
         Caption         =   "启动"
         Height          =   345
         Index           =   2
         Left            =   4800
         TabIndex        =   24
         ToolTipText     =   "停止或启动计数器"
         Top             =   1680
         Width           =   870
      End
      Begin VB.CommandButton cmdCT 
         Caption         =   "启动"
         Height          =   345
         Index           =   1
         Left            =   4800
         TabIndex        =   23
         ToolTipText     =   "停止或启动计数器"
         Top             =   1185
         Width           =   870
      End
      Begin VB.ComboBox cobCTmode 
         Height          =   345
         Index           =   2
         ItemData        =   "Form1.frx":030A
         Left            =   2520
         List            =   "Form1.frx":0320
         Style           =   2  'Dropdown List
         TabIndex        =   22
         Top             =   1680
         Width           =   1095
      End
      Begin VB.ComboBox cobCTmode 
         Height          =   345
         Index           =   1
         ItemData        =   "Form1.frx":034E
         Left            =   2520
         List            =   "Form1.frx":0364
         Style           =   2  'Dropdown List
         TabIndex        =   21
         Top             =   1185
         Width           =   1095
      End
      Begin VB.ComboBox cobCTmode 
         Height          =   345
         Index           =   0
         ItemData        =   "Form1.frx":0392
         Left            =   2520
         List            =   "Form1.frx":03A8
         Style           =   2  'Dropdown List
         TabIndex        =   20
         Top             =   690
         Width           =   1095
      End
      Begin VB.CommandButton cmdCT 
         Caption         =   "启动"
         Height          =   360
         Index           =   0
         Left            =   4800
         TabIndex        =   19
         ToolTipText     =   "停止或启动计数器"
         Top             =   690
         Width           =   870
      End
      Begin VB.TextBox txtInitCTval 
         Height          =   330
         Index           =   2
         Left            =   3690
         TabIndex        =   18
         Text            =   "初值3"
         Top             =   1680
         Width           =   1110
      End
      Begin VB.TextBox txtInitCTval 
         Height          =   330
         Index           =   1
         Left            =   3690
         TabIndex        =   17
         Text            =   "初值2"
         Top             =   1185
         Width           =   1110
      End
      Begin VB.TextBox txtInitCTval 
         Height          =   345
         Index           =   0
         Left            =   3690
         TabIndex        =   16
         Text            =   "初值1"
         Top             =   690
         Width           =   1110
      End
      Begin VB.Label lblCurrCTval 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "当前值3"
         Height          =   330
         Index           =   2
         Left            =   1305
         TabIndex        =   33
         Top             =   1680
         Width           =   1125
      End
      Begin VB.Label lblCurrCTval 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "当前值2"
         Height          =   330
         Index           =   1
         Left            =   1305
         TabIndex        =   32
         Top             =   1185
         Width           =   1125
      End
      Begin VB.Label lblCurrCTval 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "当前值1"
         Height          =   330
         Index           =   0
         Left            =   1305
         TabIndex        =   31
         Top             =   690
         Width           =   1125
      End
      Begin VB.Label Label2 
         Caption         =   "初值"
         Height          =   285
         Index           =   5
         Left            =   3930
         TabIndex        =   30
         Top             =   360
         Width           =   615
      End
      Begin VB.Label Label2 
         Caption         =   "工作方式"
         Height          =   285
         Index           =   4
         Left            =   2580
         TabIndex        =   29
         Top             =   360
         Width           =   1005
      End
      Begin VB.Label Label2 
         Caption         =   "当前值"
         Height          =   285
         Index           =   3
         Left            =   1515
         TabIndex        =   28
         Top             =   360
         Width           =   855
      End
      Begin VB.Label Label2 
         Caption         =   "计数器3:"
         Height          =   285
         Index           =   2
         Left            =   285
         TabIndex        =   27
         Top             =   1725
         Width           =   930
      End
      Begin VB.Label Label2 
         Caption         =   "计数器2:"
         Height          =   285
         Index           =   1
         Left            =   285
         TabIndex        =   26
         Top             =   1245
         Width           =   930
      End
      Begin VB.Label Label2 
         Caption         =   "计数器1:"
         Height          =   285
         Index           =   0
         Left            =   285
         TabIndex        =   25
         Top             =   765
         Width           =   930
      End
   End
   Begin VB.Timer timerCT 
      Left            =   11970
      Top             =   165
   End
   Begin VB.Frame Frame1 
      Caption         =   "AD:"
      Height          =   5325
      Left            =   150
      TabIndex        =   2
      Top             =   615
      Width           =   13065
      Begin VB.Frame Frame6 
         Height          =   3495
         Left            =   300
         TabIndex        =   83
         Top             =   1710
         Width           =   10065
         Begin VB.ComboBox cobWaveNO 
            Height          =   345
            ItemData        =   "Form1.frx":03D6
            Left            =   7500
            List            =   "Form1.frx":03D8
            Style           =   2  'Dropdown List
            TabIndex        =   89
            Top             =   270
            Width           =   780
         End
         Begin VB.PictureBox Picture1 
            BackColor       =   &H00FFFF80&
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   0
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            Height          =   2580
            Left            =   195
            ScaleHeight     =   168
            ScaleMode       =   3  'Pixel
            ScaleWidth      =   642
            TabIndex        =   88
            Top             =   765
            Width           =   9690
         End
         Begin VB.OptionButton Option1 
            Caption         =   "取一部分求平均值显示"
            Height          =   360
            Index           =   1
            Left            =   3690
            TabIndex        =   86
            Top             =   270
            Width           =   2670
         End
         Begin VB.TextBox txtShowCnt 
            Height          =   330
            Left            =   2220
            TabIndex        =   85
            Text            =   "1"
            Top             =   285
            Width           =   705
         End
         Begin VB.OptionButton Option1 
            Caption         =   "显示每批数的前       个值"
            Height          =   360
            Index           =   0
            Left            =   285
            TabIndex        =   87
            Top             =   270
            Width           =   3315
         End
         Begin VB.OptionButton Option1 
            Caption         =   "显示第       通道部分曲线"
            Height          =   360
            Index           =   2
            Left            =   6510
            TabIndex        =   84
            Top             =   270
            Width           =   3285
         End
      End
      Begin VB.ComboBox cobPSNO 
         Height          =   345
         ItemData        =   "Form1.frx":03DA
         Left            =   5985
         List            =   "Form1.frx":03DC
         Style           =   2  'Dropdown List
         TabIndex        =   82
         Top             =   1320
         Width           =   2205
      End
      Begin VB.CommandButton cmdPStimerAD 
         Caption         =   "  开始PS端子    板定时采集"
         Height          =   705
         Left            =   10920
         TabIndex        =   76
         Top             =   3705
         Width           =   1695
      End
      Begin VB.ComboBox cobAmp 
         Height          =   345
         ItemData        =   "Form1.frx":03DE

⌨️ 快捷键说明

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