thermoform.vb

来自「使用研华DAQ和VB.net实现研华数据采集卡的多种功能.包括数据输入输出。内含」· VB 代码 · 共 885 行 · 第 1/3 页

        Me.cmbSelectDaughter.Size = New System.Drawing.Size(105, 25)
        Me.cmbSelectDaughter.TabIndex = 20
        Me.cmbSelectDaughter.Text = "Select Daughter"
        '
        'cmbDaughterChannel
        '
        Me.cmbDaughterChannel.BackColor = System.Drawing.SystemColors.Window
        Me.cmbDaughterChannel.Cursor = System.Windows.Forms.Cursors.Default
        Me.cmbDaughterChannel.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cmbDaughterChannel.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cmbDaughterChannel.ForeColor = System.Drawing.SystemColors.WindowText
        Me.cmbDaughterChannel.Location = New System.Drawing.Point(112, 208)
        Me.cmbDaughterChannel.Name = "cmbDaughterChannel"
        Me.cmbDaughterChannel.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.cmbDaughterChannel.Size = New System.Drawing.Size(105, 22)
        Me.cmbDaughterChannel.TabIndex = 18
        '
        'cmbThermoScale
        '
        Me.cmbThermoScale.BackColor = System.Drawing.SystemColors.Window
        Me.cmbThermoScale.Cursor = System.Windows.Forms.Cursors.Default
        Me.cmbThermoScale.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cmbThermoScale.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cmbThermoScale.ForeColor = System.Drawing.SystemColors.WindowText
        Me.cmbThermoScale.Location = New System.Drawing.Point(112, 72)
        Me.cmbThermoScale.Name = "cmbThermoScale"
        Me.cmbThermoScale.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.cmbThermoScale.Size = New System.Drawing.Size(105, 22)
        Me.cmbThermoScale.TabIndex = 16
        '
        'cmbThermoType
        '
        Me.cmbThermoType.BackColor = System.Drawing.SystemColors.Window
        Me.cmbThermoType.Cursor = System.Windows.Forms.Cursors.Default
        Me.cmbThermoType.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cmbThermoType.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cmbThermoType.ForeColor = System.Drawing.SystemColors.WindowText
        Me.cmbThermoType.Location = New System.Drawing.Point(112, 48)
        Me.cmbThermoType.Name = "cmbThermoType"
        Me.cmbThermoType.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.cmbThermoType.Size = New System.Drawing.Size(105, 22)
        Me.cmbThermoType.TabIndex = 14
        '
        'Line1
        '
        Me.Line1.BackColor = System.Drawing.SystemColors.WindowText
        Me.Line1.Location = New System.Drawing.Point(0, 128)
        Me.Line1.Name = "Line1"
        Me.Line1.Size = New System.Drawing.Size(248, 1)
        Me.Line1.TabIndex = 29
        '
        'Label4
        '
        Me.Label4.BackColor = System.Drawing.SystemColors.Control
        Me.Label4.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label4.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label4.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label4.Location = New System.Drawing.Point(16, 176)
        Me.Label4.Name = "Label4"
        Me.Label4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label4.Size = New System.Drawing.Size(89, 17)
        Me.Label4.TabIndex = 21
        Me.Label4.Text = "Daughter Name:"
        '
        'Label12
        '
        Me.Label12.BackColor = System.Drawing.SystemColors.Control
        Me.Label12.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label12.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label12.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label12.Location = New System.Drawing.Point(16, 208)
        Me.Label12.Name = "Label12"
        Me.Label12.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label12.Size = New System.Drawing.Size(97, 17)
        Me.Label12.TabIndex = 19
        Me.Label12.Text = "Daughter Channel:"
        '
        'Label11
        '
        Me.Label11.BackColor = System.Drawing.SystemColors.Control
        Me.Label11.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label11.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label11.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label11.Location = New System.Drawing.Point(12, 104)
        Me.Label11.Name = "Label11"
        Me.Label11.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label11.Size = New System.Drawing.Size(89, 17)
        Me.Label11.TabIndex = 17
        Me.Label11.Text = "Das Channel:"
        '
        'Label9
        '
        Me.Label9.BackColor = System.Drawing.SystemColors.Control
        Me.Label9.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label9.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label9.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label9.Location = New System.Drawing.Point(11, 80)
        Me.Label9.Name = "Label9"
        Me.Label9.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label9.Size = New System.Drawing.Size(80, 17)
        Me.Label9.TabIndex = 15
        Me.Label9.Text = "Thermo Scale:"
        '
        'Label7
        '
        Me.Label7.BackColor = System.Drawing.SystemColors.Control
        Me.Label7.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label7.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label7.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label7.Location = New System.Drawing.Point(11, 56)
        Me.Label7.Name = "Label7"
        Me.Label7.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label7.Size = New System.Drawing.Size(81, 17)
        Me.Label7.TabIndex = 13
        Me.Label7.Text = "Thermo Type:"
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.BackColor = System.Drawing.SystemColors.Control
        Me.Label3.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label3.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label3.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label3.Location = New System.Drawing.Point(12, 32)
        Me.Label3.Name = "Label3"
        Me.Label3.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label3.Size = New System.Drawing.Size(97, 16)
        Me.Label3.TabIndex = 9
        Me.Label3.Text = "Input Range(Gain):"
        '
        'Frame1
        '
        Me.Frame1.BackColor = System.Drawing.SystemColors.Control
        Me.Frame1.Controls.Add(Me.txtDeviceNum)
        Me.Frame1.Controls.Add(Me.txtDeviceName)
        Me.Frame1.Controls.Add(Me.cmdSelectDevice)
        Me.Frame1.Controls.Add(Me.Label1)
        Me.Frame1.Controls.Add(Me.Label2)
        Me.Frame1.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Frame1.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Frame1.Location = New System.Drawing.Point(8, 8)
        Me.Frame1.Name = "Frame1"
        Me.Frame1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Frame1.Size = New System.Drawing.Size(368, 79)
        Me.Frame1.TabIndex = 42
        Me.Frame1.TabStop = False
        Me.Frame1.Text = "Select Device :"
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.BackColor = System.Drawing.SystemColors.Control
        Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label1.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label1.Location = New System.Drawing.Point(8, 27)
        Me.Label1.Name = "Label1"
        Me.Label1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label1.Size = New System.Drawing.Size(64, 16)
        Me.Label1.TabIndex = 5
        Me.Label1.Text = "Device No. :"
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.BackColor = System.Drawing.SystemColors.Control
        Me.Label2.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label2.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label2.Location = New System.Drawing.Point(8, 51)
        Me.Label2.Name = "Label2"
        Me.Label2.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label2.Size = New System.Drawing.Size(76, 16)
        Me.Label2.TabIndex = 4
        Me.Label2.Text = "Device Name :"
        '
        'Frame4
        '
        Me.Frame4.BackColor = System.Drawing.SystemColors.Control
        Me.Frame4.Controls.Add(Me.Label14)
        Me.Frame4.Controls.Add(Me.txtErrCode)
        Me.Frame4.Controls.Add(Me.txtSampleNumber)
        Me.Frame4.Controls.Add(Me.txtThermoReading)
        Me.Frame4.Controls.Add(Me.hscrlFreq)
        Me.Frame4.Controls.Add(Me.cmdThermoStop)
        Me.Frame4.Controls.Add(Me.cmdThermoStart)
        Me.Frame4.Controls.Add(Me.Label13)
        Me.Frame4.Controls.Add(Me.Label10)
        Me.Frame4.Controls.Add(Me.Label8)
        Me.Frame4.Controls.Add(Me.Label6)
        Me.Frame4.Controls.Add(Me.Label5)
        Me.Frame4.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Frame4.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Frame4.Location = New System.Drawing.Point(272, 96)
        Me.Frame4.Name = "Frame4"
        Me.Frame4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Frame4.Size = New System.Drawing.Size(208, 241)
        Me.Frame4.TabIndex = 45
        Me.Frame4.TabStop = False
        Me.Frame4.Text = "Thermo Read:"
        '
        'Label14
        '
        Me.Label14.Location = New System.Drawing.Point(8, 192)
        Me.Label14.Name = "Label14"
        Me.Label14.Size = New System.Drawing.Size(88, 16)
        Me.Label14.TabIndex = 33
        Me.Label14.Text = "Error Message"
        '
        'txtErrCode
        '
        Me.txtErrCode.Location = New System.Drawing.Point(8, 208)
        Me.txtErrCode.Name = "txtErrCode"
        Me.txtErrCode.ReadOnly = True
        Me.txtErrCode.Size = New System.Drawing.Size(192, 20)
        Me.txtErrCode.TabIndex = 32
        Me.txtErrCode.Text = ""
        '
        'txtSampleNumber
        '
        Me.txtSampleNumber.AcceptsReturn = True
        Me.txtSampleNumber.AutoSize = False
        Me.txtSampleNumber.BackColor = System.Drawing.SystemColors.Window
        Me.txtSampleNumber.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtSampleNumber.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtSampleNumber.ForeColor = System.Drawing.SystemColors.WindowText
        Me.txtSampleNumber.Location = New System.Drawing.Point(104, 120)
        Me.txtSampleNumber.MaxLength = 0
        Me.txtSampleNumber.Name = "txtSampleNumber"
        Me.txtSampleNumber.ReadOnly = True
        Me.txtSampleNumber.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtSampleNumber.Size = New System.Drawing.Size(72, 25)
        Me.txtSampleNumber.TabIndex = 30
        Me.txtSampleNumber.Text = "0"
        Me.txtSampleNumber.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'txtThermoReading
        '
        Me.txtThermoReading.AcceptsReturn = True
        Me.txtThermoReading.AutoSize = False
        Me.txtThermoReading.BackColor = System.Drawing.SystemColors.Window
        Me.txtThermoReading.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtThermoReading.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtThermoReading.ForeColor = System.Drawing.Color.Blue
        Me.txtThermoReading.Location = New System.Drawing.Point(104, 160)
        Me.txtThermoReading.MaxLength = 0
        Me.txtThermoReading.Name = "txtThermoReading"
        Me.txtThermoReading.ReadOnly = True
        Me.txtThermoReading.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtThermoReading.Size = New System.Drawing.Size(72, 25)
        Me.txtThermoReading.TabIndex = 26
        Me.txtThermoReading.Text = ""
        Me.txtThermoReading.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'hscrlFreq
        '
        Me.hscrlFreq.Cursor = System.Windows.Forms.Cursors.Default
        Me.hscrlFreq.LargeChange = 1
        Me.hscrlFreq.Location = New System.Drawing.Point(16, 72)
        Me.hscrlFreq.Minimum = 1
        Me.hscrlFreq.Name = "hscrlFreq"
        Me.hscrlFreq.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.hscrlFreq.Size = New System.Drawing.Size(160, 17)
        Me.hscrlFreq.TabIndex = 23
        Me.hscrlFreq.TabStop = True
        Me.hscrlFreq.Value = 10
        '
        'Label13
        '
        Me.Label13.BackColor = System.Drawing.SystemColors.Control
        Me.Label13.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label13.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label13.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label13.Location = New System.Drawing.Point(128, 96)
        Me.Label13.Name = "Label13"
        Me.Label13.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label13.Size = New System.Drawing.Size(56, 16)
        Me.Label13.TabIndex = 31
        Me.Label13.Text = "100 time/s"
        '
        'Label10
        '
        Me.Label10.BackColor = System.Drawing.SystemColors.Control
        Me.Label10.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label10.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label10.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label10.Location = New System.Drawing.Point(8, 128)
        Me.Label10.Name = "Label10"
        Me.Label10.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label10.Size = New System.Drawing.Size(88, 16)
        Me.Label10.TabIndex = 29
        Me.Label10.Text = "Sample Number:"
        '
        'Label8
        '