成全高清免费完整观看,日韩一区二区三免费高清,欧美在线看欧美视频免费,日本无码专区无码二区

jack034
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看jack034的 主題 / 回貼
樓主  發表于: 2008-12-05 10:50
Private Function sumchk(data$) As String '求校驗和函數
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返回數據是什么類型的??假設Y0--Y7的值為10110111
PLC返回到VB的緩沖區的值是10110111 還是31H 30H 31H 31H 30H 31H 31H 31H ??
請各位指教!!!
jack034
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看jack034的 主題 / 回貼
1樓  發表于: 2008-12-13 00:00
多謝指教!!!

<sup id="t49uz"><pre id="t49uz"></pre></sup>
    <xmp id="t49uz"><sup id="t49uz"><pre id="t49uz"></pre></sup>
    <sup id="t49uz"><font id="t49uz"></font></sup>
    <sup id="t49uz"></sup>
    主站蜘蛛池模板: 嘉禾县| 石景山区| 南郑县| 免费播放男人添女人下边APP| 便器调教(肉体狂乱)小说| 免费观看做爰视频| 人体裸体BBBBB欣赏| 岗巴县| 永寿县| 姜堰市| 乳尖春药H糙汉共妻| 武城县| 老妇大炕交换配乱大交| 暖暖免费视频日本中文| 性做爰A片欧美激情艳妇20P| 国产大片B站免费观看推荐| 甘南县| 日韩乱码人妻无码系列中文字幕| 乱熟女高潮一区二区在线| JIZZJIZZ国产免费A片| 欧美日韩亚洲国内综合网| 成全视频在线播放观看方法| 宝贝再忍点灬舒服灬大点视频| 热久久2018亚洲欧美| 中国CHINA露脸自拍性HD| 免费无线无码视频在线观看| 山外人精品影院| 广宁县| 精品国产乱码久久久久久口爆| 榆中县| 日本妇人成熟免费| 西畴县| 成人做爰A片免费看黄冈| 太仓市| 国产精品成人99一区无码| 方山县| 靖西县| 靖州| 体内射精一区二区三区在线视频 | 米脂县| 狂C亲女含苞欲H小黄文|