您现在所在的是:

三菱Mitsubishi

回帖:0个,阅读:494 [上一页] [1] [下一页]
1029
bkhm21
文章数:15
年度积分:50
历史总积分:1029
注册时间:2006/3/5
发站内信
发表于:2010/8/28 10:03:56
#0楼
mitsubishi fx 1n与VB进行通讯时(用mscomm控件,PLC编程口通讯)
做通讯测试时,代码下列:
Private Sub Command1_Click()
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
Dim ff As String
MSComm1.Output = Chr(5)
Do
DoEvents
Loop Until MSComm1.InBufferCount = 1
ff = MSComm1.Input
Label1.Caption = Asc(ff)
End Sub
此时,Label1控件显示6,
若读取D8001的数值时(D8001编程口地址0E02),使用如下代码:
Private Sub Command2_Click()
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
Dim dd As String
MSComm1.Output = Chr(2) + "0" + "0e0202" + Chr(3) + "6c"
Do
DoEvents
Loop Until MSComm1.InBufferCount = 8
dd = MSComm1.Input
Label1.Caption = Asc(dd)
End Sub
此时,Label1控件不能正确显示。将Chr(2) + "0" + "0e0202" + Chr(3) + "6c"用16进制在串口调试助手发送至PLC,串口调试会返回正常的16进制数值。
请问各位,如想在Label1控件显示读取D8001数值PLC返回数值应如何修改代码!谢谢!

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 工控网 Copyright©2025 Gkong.com, All Rights Reserved

31.2002