国产蝌蚪视频在线观看_亚洲亚色_日批网站免费_亚拍一区_69网站_九热精品_最新中文在线视频_欧美视频日韩视频_国内精品二区_天堂资源站_av综合一区_国产精品久免费的黄网站_四虎免费在线观看_少妇做爰奶水狂喷视频_野花视频韩国免费观看3_久久国产精品亚洲人一区二区三区_国产日产精品_国产精品毛片_亚洲精品久久草草起碰_国产偷国产偷亚洲综合av_两个人日本WWW免费版_91麻豆视频_亚欧在线观看视频_久久久99免费_久久精品视频12_麻豆视频播放_日本高清WWW午色夜COM_公和我做好爽添厨房_成人午夜剧场在线观看_gay无套ⅹxxoo_在线观看成人福利

jack034
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看jack034的 主題 / 回貼
樓主  發(fā)表于: 2008-12-05 10:50
Private Function sumchk(data$) As String '求校驗和函數(shù)
Dim i&
Dim chk&
For i = 1 To Len(dats)
chk = chk + Asc(Mid(dats, i, 1))
Next i
sumchk = Right(Hex$(chk), 2)
End Function

Private Sub Form_Load() '初始化
MSComm1.PortOpen = True
MSComm1.CommPort = 1
MSComm1.Settings = "9600,e,7,1"
MSComm1.InputLen = 0
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
Dim sd As String
Dim rd As String
sd = "00" + "FF" + "BR" + "0" + "Y0000" + "08"
MSComm1.Output = Chr$(5) + djsd + sumchk(sd)
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 13
rd = MSComm1.Input

請問PLC返回數(shù)據(jù)是什么類型的??假設(shè)Y0--Y7的值為10110111
PLC返回到VB的緩沖區(qū)的值是10110111 還是31H 30H 31H 31H 30H 31H 31H 31H ??
請各位指教!!!
一天賊忙
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 4 個
工控威望: 433 點
下載積分: 6292 分
在線時間: 42(小時)
注冊時間: 2007-11-15
最后登錄: 2025-09-04
查看一天賊忙的 主題 / 回貼
1樓  發(fā)表于: 2008-12-11 13:36
是B7,也就是42 37 但還有起始停止和檢驗位
混灌水區(qū)的!
jack034
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看jack034的 主題 / 回貼
2樓  發(fā)表于: 2008-12-13 00:00
多謝指教!!!
s_chen
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看s_chen的 主題 / 回貼
3樓  發(fā)表于: 2008-12-13 07:29
學(xué)習(xí)了謝謝分享

偃师市| 保康县| 福海县| 康平县| 滦平县| 汉寿县| 思茅市| 银川市| 湖南省| 威远县| 永胜县| 桦甸市| 长葛市| 崇州市| 周宁县| 潢川县| 钟祥市| 梅州市| 阿拉尔市| 分宜县| 菏泽市| 香河县| 柳林县| 玉山县| 苏州市| 巴东县| 灵川县| 广宗县| 股票| 肃北| 富锦市| 铜山县| 滦南县| 西城区| 民和| 墨玉县| 娄烦县| 扎赉特旗| 苍溪县| 米易县| 铜陵市|