2008秒工艺通道实验.pptVIP

实验介绍 一、实验装置简介 一、实验装置简介 二、VB编程基础 二、VB编程基础 二、VB编程基础 二、VB编程基础 二、VB编程基础 二、VB编程基础 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 三、PCI-1711数据采集卡 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 四、VB编程实例 * * Computer Controlled Systems 三、PCI-1711数据采集卡 四、VB编程实例 一、实验装置简介 二、VB编程基础 1、电源：包括电源开关，保险丝，提供5V，15V，0V，1.2~15V可调电压的输出； 2、信号源：包括周期性正弦信号,周期性斜坡、方波、抛物线信号，频率幅值可调； 3、提供实验所需的电容、电阻、电位器，提供插接电路，可以自己选择插接 的元器件； 4、提供16个开关量作为数字量的输入信号，16个LED显示灯作为数字量输出口控制端； 5、运算放大器； 6、电机装置； 7、温度控制与检测装置； 8、水槽装置； 1、变量声明 一般可用Dim语句声明变量，即： Dim 变量名 As 变量类型 例如： Dim intA As integer 该语句将变量intA定义为整型变量 常见的变量类型包括： Long，Double，Single，Char 2、常用结构 （1）If 结构 If Condition1 Then ElseIf Condition2 Then Else End If （2）Select Case 分支结构 Select Case 变量名 Case Value1 当Value1与变量匹配时执行的语句 Case Value2 当Value2与变量匹配时执行的语句 End Select （3） For循环结构 For 变量名=start To end 要重复执行的语句 Next 变量名 例如： For I=1 to 4 Beep Next I 3、过程 使用 Sub进行定义，可以传递圆括号中的参数，但无返值。 例如： Sub Form_Load() IntValue=0 lblValue.Caption=Cstr(IntValue) End Sub 4、函数 使用 Function进行定义，有返值。 例如： Function PID(ByVal e_1 As Single, e_2 As Single, sum As Single, u As Single, ByVal Kp As Single, ByVal Ti As Single, ByVal Td As Single, ByVal T As Single) As Long //注释：Function 标明是一个VB函数； PID是函数名，同时也是函数的返回值； （ByVal e_1 As Single, e_2 As Single,……）函数所需变量定义，其中ByVal指参数按值来传送；ByRef指按地址来传送（ByRef是VB默认选项） 1、功能简介 研华公司的PCI-1711为多功能卡，PCI总线接口，具有： 16通道单端模拟输入、采集速率可达100kHz，AI0~AI15）； 16通道数字量输入（DI0~DI15）； 16通道数字量输出（DO0~DO15）； 2通道模拟量输出（AO0~AO15）； 可编程的计数器。 1、操作说明 （1）一般步骤： A、注册设备 调用DRV_DeviceOpen B、使用设备 调用相关函数 C、释放设备 调用DRV_DeviceClose 1、操作说明 （2）I/O操作函数说明 ： a、DRV_DioReadPortByte status = DRV_DioReadPortByte (DriverHandle, lpDioReadPortByte) Name Type Range Description DeviceHandle long default 取决于 DRV_DeviceOpen LpDioReadPort Byte long pointer to PT_