aosyncform.vb

使用研华DAQ和VB.net实现研华数据采集卡的多种功能.包括数据输入输出。内含多个源码

        Me.txtDeviceNum.AutoSize = False
        Me.txtDeviceNum.BackColor = System.Drawing.SystemColors.Window
        Me.txtDeviceNum.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtDeviceNum.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtDeviceNum.ForeColor = System.Drawing.SystemColors.WindowText
        Me.txtDeviceNum.Location = New System.Drawing.Point(88, 20)
        Me.txtDeviceNum.MaxLength = 0
        Me.txtDeviceNum.Name = "txtDeviceNum"
        Me.txtDeviceNum.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtDeviceNum.Size = New System.Drawing.Size(57, 19)
        Me.txtDeviceNum.TabIndex = 1
        Me.txtDeviceNum.Text = "-100"
        Me.ToolTip1.SetToolTip(Me.txtDeviceNum, "Device Number")
        '
        'Frame4
        '
        Me.Frame4.BackColor = System.Drawing.SystemColors.Control
        Me.Frame4.Controls.Add(Me.txtScanTime)
        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(408, 264)
        Me.Frame4.Name = "Frame4"
        Me.Frame4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Frame4.Size = New System.Drawing.Size(121, 72)
        Me.Frame4.TabIndex = 26
        Me.Frame4.TabStop = False
        Me.Frame4.Text = "Scan &Time Setting"
        '
        'txtScanTime
        '
        Me.txtScanTime.AcceptsReturn = True
        Me.txtScanTime.AutoSize = False
        Me.txtScanTime.BackColor = System.Drawing.SystemColors.Window
        Me.txtScanTime.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtScanTime.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtScanTime.ForeColor = System.Drawing.SystemColors.WindowText
        Me.txtScanTime.Location = New System.Drawing.Point(21, 32)
        Me.txtScanTime.MaxLength = 0
        Me.txtScanTime.Name = "txtScanTime"
        Me.txtScanTime.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtScanTime.Size = New System.Drawing.Size(68, 20)
        Me.txtScanTime.TabIndex = 21
        Me.txtScanTime.Text = "1000"
        '
        'Label5
        '
        Me.Label5.BackColor = System.Drawing.SystemColors.Control
        Me.Label5.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label5.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label5.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label5.Location = New System.Drawing.Point(96, 32)
        Me.Label5.Name = "Label5"
        Me.Label5.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label5.Size = New System.Drawing.Size(24, 17)
        Me.Label5.TabIndex = 22
        Me.Label5.Text = "ms"
        '
        'Frame1
        '
        Me.Frame1.BackColor = System.Drawing.SystemColors.Control
        Me.Frame1.Controls.Add(Me.cmdSelectDevice)
        Me.Frame1.Controls.Add(Me.txtDeviceName)
        Me.Frame1.Controls.Add(Me.txtDeviceNum)
        Me.Frame1.Controls.Add(Me.Label2)
        Me.Frame1.Controls.Add(Me.Label1)
        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, 2)
        Me.Frame1.Name = "Frame1"
        Me.Frame1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Frame1.Size = New System.Drawing.Size(401, 79)
        Me.Frame1.TabIndex = 21
        Me.Frame1.TabStop = False
        Me.Frame1.Text = "Select Device :"
        '
        '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 = 5
        Me.Label2.Text = "Device Name :"
        '
        '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, 21)
        Me.Label1.Name = "Label1"
        Me.Label1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label1.Size = New System.Drawing.Size(64, 16)
        Me.Label1.TabIndex = 4
        Me.Label1.Text = "Device No. :"
        '
        'Frame2
        '
        Me.Frame2.BackColor = System.Drawing.SystemColors.Control
        Me.Frame2.Controls.Add(Me.chkListBox)
        Me.Frame2.Controls.Add(Me.frmOutputKind)
        Me.Frame2.Controls.Add(Me.chkSyncAOEnable)
        Me.Frame2.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Frame2.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Frame2.Location = New System.Drawing.Point(8, 84)
        Me.Frame2.Name = "Frame2"
        Me.Frame2.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Frame2.Size = New System.Drawing.Size(395, 252)
        Me.Frame2.TabIndex = 23
        Me.Frame2.TabStop = False
        Me.Frame2.Text = "Property Settings:"
        '
        'chkListBox
        '
        Me.chkListBox.CheckOnClick = True
        Me.chkListBox.Location = New System.Drawing.Point(8, 104)
        Me.chkListBox.MultiColumn = True
        Me.chkListBox.Name = "chkListBox"
        Me.chkListBox.Size = New System.Drawing.Size(376, 139)
        Me.chkListBox.TabIndex = 10
        '
        'frmOutputKind
        '
        Me.frmOutputKind.BackColor = System.Drawing.SystemColors.Control
        Me.frmOutputKind.Controls.Add(Me.optVoltageOut)
        Me.frmOutputKind.Controls.Add(Me.optCurrentOut0)
        Me.frmOutputKind.Controls.Add(Me.optCurrentOut4)
        Me.frmOutputKind.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.frmOutputKind.ForeColor = System.Drawing.SystemColors.ControlText
        Me.frmOutputKind.Location = New System.Drawing.Point(8, 40)
        Me.frmOutputKind.Name = "frmOutputKind"
        Me.frmOutputKind.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.frmOutputKind.Size = New System.Drawing.Size(375, 48)
        Me.frmOutputKind.TabIndex = 9
        Me.frmOutputKind.TabStop = False
        Me.frmOutputKind.Text = "Output Type:"
        '
        'optVoltageOut
        '
        Me.optVoltageOut.BackColor = System.Drawing.SystemColors.Control
        Me.optVoltageOut.Checked = True
        Me.optVoltageOut.Cursor = System.Windows.Forms.Cursors.Default
        Me.optVoltageOut.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.optVoltageOut.ForeColor = System.Drawing.SystemColors.ControlText
        Me.optVoltageOut.Location = New System.Drawing.Point(17, 24)
        Me.optVoltageOut.Name = "optVoltageOut"
        Me.optVoltageOut.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.optVoltageOut.Size = New System.Drawing.Size(76, 13)
        Me.optVoltageOut.TabIndex = 12
        Me.optVoltageOut.TabStop = True
        Me.optVoltageOut.Text = "&Voltage Out"
        '
        'optCurrentOut0
        '
        Me.optCurrentOut0.BackColor = System.Drawing.SystemColors.Control
        Me.optCurrentOut0.Cursor = System.Windows.Forms.Cursors.Default
        Me.optCurrentOut0.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.optCurrentOut0.ForeColor = System.Drawing.SystemColors.ControlText
        Me.optCurrentOut0.Location = New System.Drawing.Point(104, 24)
        Me.optCurrentOut0.Name = "optCurrentOut0"
        Me.optCurrentOut0.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.optCurrentOut0.Size = New System.Drawing.Size(122, 13)
        Me.optCurrentOut0.TabIndex = 11
        Me.optCurrentOut0.TabStop = True
        Me.optCurrentOut0.Text = "&0 - 20 mA Current Out"
        '
        'optCurrentOut4
        '
        Me.optCurrentOut4.BackColor = System.Drawing.SystemColors.Control
        Me.optCurrentOut4.Cursor = System.Windows.Forms.Cursors.Default
        Me.optCurrentOut4.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.optCurrentOut4.ForeColor = System.Drawing.SystemColors.ControlText
        Me.optCurrentOut4.Location = New System.Drawing.Point(240, 24)
        Me.optCurrentOut4.Name = "optCurrentOut4"
        Me.optCurrentOut4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.optCurrentOut4.Size = New System.Drawing.Size(122, 13)
        Me.optCurrentOut4.TabIndex = 10
        Me.optCurrentOut4.TabStop = True
        Me.optCurrentOut4.Text = "&4 - 20 mA Current Out"
        '
        'chkSyncAOEnable
        '
        Me.chkSyncAOEnable.BackColor = System.Drawing.SystemColors.Control
        Me.chkSyncAOEnable.Checked = True
        Me.chkSyncAOEnable.CheckState = System.Windows.Forms.CheckState.Checked
        Me.chkSyncAOEnable.Cursor = System.Windows.Forms.Cursors.Default
        Me.chkSyncAOEnable.Font = New System.Drawing.Font("Arial", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.chkSyncAOEnable.ForeColor = System.Drawing.SystemColors.ControlText
        Me.chkSyncAOEnable.Location = New System.Drawing.Point(8, 24)
        Me.chkSyncAOEnable.Name = "chkSyncAOEnable"
        Me.chkSyncAOEnable.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.chkSyncAOEnable.Size = New System.Drawing.Size(165, 15)
        Me.chkSyncAOEnable.TabIndex = 8
        Me.chkSyncAOEnable.Text = "S&ynchronously AO Enable"
        '
        'DAQAO1
        '
        Me.DAQAO1.Enabled = True
        Me.DAQAO1.Location = New System.Drawing.Point(448, 8)
        Me.DAQAO1.Name = "DAQAO1"
        Me.DAQAO1.OcxState = CType(resources.GetObject("DAQAO1.OcxState"), System.Windows.Forms.AxHost.State)
        Me.DAQAO1.Size = New System.Drawing.Size(33, 33)
        Me.DAQAO1.TabIndex = 27
        '
        'frmAoSync
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
        Me.ClientSize = New System.Drawing.Size(544, 349)
        Me.Controls.Add(Me.DAQAO1)
        Me.Controls.Add(Me.Frame4)
        Me.Controls.Add(Me.Frame1)
        Me.Controls.Add(Me.Frame2)
        Me.Controls.Add(Me.Frame3)
        Me.Controls.Add(Me.cmdExit)
        Me.MaximizeBox = False
        Me.Name = "frmAoSync"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Sync Anolog output"
        Me.Frame3.ResumeLayout(False)
        Me.Frame4.ResumeLayout(False)