西门子工业自动化沈阳总代理
专业销售西门子S7-200/300/400/1200/1500PLC,ET200分布式I/O:ET200S、ET200M、ET200SP、ET200PRO、3RW系列软启动器(3RW30/3RW40/3RW44/3RW31)、3RK系列电机启动器、数控系统、变频器(MM420/MM430/MM440/S110/S120/G120/G120C/V10/V20/V60/V80/V90/G130/G150)、人机界面、触摸屏、伺服、电机、西门子通讯电缆、现场总线、DP接头、工控机,西门子低压电器,仪器仪表等,并可提供西门子维修服务,欢迎来电垂询。
作为的工业自动化和数字化解决方案提供商,西门子PLC控制器在工业自动化领域具有广泛的应用。作为西门子PLC控制器的全国代理商,我们引入了西门子PLC模块总代理,提供Zui新的西门子PLC控制器和西门子PLC模块,我们致力于为客户提供Zui优质的西门子PLC控制器产品,同时也提供各种控制面板和自动化系统的设计、开发和集成服务,帮助客户tigao生产效率和管理效益。
3.1 MSComm控件
VB的通信控件MSComm能够提供串行通信的全部功能,程序编写、调试简单方便,开发速度快,该控件封装了通信过程中的底层操作程序,用户只需设置和监控控件的属性和事件,就可以方便地实现异步串行通信。
采用MSComm控件接收数据,按照接收方式分两种形式:事件驱动方式,定时查询方式。本例为适应liuliang的实时控制采用定时驱动方式,若定时器计时到,通过串行通信口向地址liuliang积算仪发出读写等操作命令,等待时间到则检查InBufferCount属性值来判断输入缓冲区中是否接受到了相应数目的字符,从而进行读取、判断数据合法性和数据存储、处理等操作。西门子工业自动化沈阳总代理
3.2 通信功能的编程实现
MSComm1.SThreshold = 1
MSComm1.Settings = 9600,N,8,1
MSComm1.InBufferSize = 1024
MSComm1.OutBufferSize = 1024
MSComm1.bbbbbMode = combbbbbModeBinary
打开串口并定时发送数据命令:Private Sub Timer1_Timer()
Dim bytearray(0 To 7) As Byte
bytearray(0) = &H1
bytearray(1) = &H3
bytearray(2) = &H0
bytearray(3) = &H2
bytearray(4) = &H0
bytearray(5) = &H8
bytearray(6) = &HE5
bytearray(7) = &HCC
MSComm1.bbbbbLen = 21
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
MSComm1.RThreshold = 1
MSComm1.PortOpen = True
If MSComm1.PortOpen = True Then
MSComm1.Output = bytearray
End If
End Sub
接受数据:Private Sub MSComm1_On
西门子工业自动化沈阳总代理