变频器 在流量控制中的使用

　　DimAAsInteger DimP0AsString DimP1AsString DimDAsLong DimD3AsString DimD2AsString DimD1AsString DimD0AsString DimSumAsLong DimSAsString A=Hex（Inverter）

　　D=Hex（Data）

　　P0=Mid（P，3，2）

　　P1=Mid（P，0，2）

　　D3=Mid（Str（D），0，2）

　　D2=Mid（Str（D），3，2）

　　D1=Mid（Str（D），5，2）

　　D0=Mid（Str（D），7，2）

　　Sum=A+Val（Fun）+Val（P0）+Val（P1）+Val（D3）+Val（D2）+Val（D1）+Val（D0）

　　S=Right（Str（Hex（Sum）），2）

　　IfMSComm1PortOpen=FalseThenMSComm1. PortOpen=True MSComm1Output="3ah" MSComm1Output=ASCII（Asc（Left（Str（A），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（A），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（Fun），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（Fun），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（P0），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（P0），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（P1），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（P1），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（D3），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（D3），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（D2），1）））

　　MSComm1Output=ASCII（Asc（Right（Str（D2），1）））

　　MSComm1Output=ASCII（Asc（Left（Str（D1），1）））

上一页  [1] [2] [3]  下一页

本文关键字：变频器  流量  变频器基础，变频技术 - 变频器基础