VB6.0控制三菱PLC的Y0 点击:321 | 回复:0



yangguo22

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:1帖 | 0回
  • 年度积分:0
  • 历史总积分:3
  • 注册:2010年11月14日
发表于:2014-10-12 22:29:16
楼主

   

VB6.0控制三菱PLC的Y0导通源码,通过PLC编程线SC-09连接,在VB6界面添加一个按钮Command1和一个MSComm1控件。

   可通过网站下载执行档试一试  http://pan.baidu.com/s/1qWDH0Ry

 

点击按钮Command1后PLC的Y0就会导通。

 

Private Sub Y1_Click()
On Error GoTo Prog_err:
   MSComm1.Output = Chr(2) + "7" + "0005" + Chr(3) + "FF"             '//Y0导通
Prog_err:
End Sub

Private Sub END_Click()
    End
End Sub


Private Sub Form_Load()                                                                       '//设置通信参数
On Error GoTo Prog_err:
If MSComm1.PortOpen = True Then MSComm1.PortOpen = False
   MSComm1.CommPort = 1
   MSComm1.Settings = "9600,E,7,1"
   MSComm1.PortOpen = True
Prog_err:
End Sub

 



热门招聘
相关主题

官方公众号

智造工程师