利用VB实现PC与PLC的联机控制

控件名称

说  明

1

form

frmmain

程序主窗体

2

frame

Frame1

框架

3

MSComm

MSComm1

串口通信控件

4

Timer

Timer1

定时器

5

CommandButton

cmdzz

正转按钮

6

CommandButton

cmdfz

反转按钮

7

CommandButton

cmdtj

停机按钮

8

Label

Labdjzt

电机状态显示标签

添加上述控件后的程序窗体如图4所示。

PC机的控制程序如下：
Private Sub Form_Load()     '窗体加载过程 
MSComm1.CommPort = 1    '通信控件选用PC机的串口1
MSComm1.Settings = "9600,o,8,1"      '设定串口1的波特率为9600bps，奇校验，8位数据位，1位停止位 
MSComm1.PortOpen = True     '打开串口1 
Timer1.Interval = 1000      '定时器1的定时值为1s
Timer1.Enabled = True       '启动定时器1    
End Sub

Function com(a As String, b As Integer) '向PLC读写寄存器内容函数 
MSComm1.InBufferCount = 0   '清空串口的接收缓冲区 
MSComm1.Output = a  '将要发送的字符串从串口发送出去 
Do
DoEvents
Loop Until MSComm1.InBufferCount >= b   '等待PLC的响应字符至一定位数 
com = MSComm1.Input     '读入串口接收到的字符串 
End Function

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

本文关键字：暂无联系方式PLC入门，plc技术 - PLC入门