最新天堂中文在线丨午夜嘿嘿嘿影院丨亚洲国产精品高清久久久丨中文字幕人成乱码熟女app丨www91亚洲丨97成人资源丨成人中文字幕+乱码+中文字幕丨一区二区三区在线 | 日丨日韩免费大片丨亚洲欧美一区二区三区丨国产在线观看a丨亚洲成人第一区丨国内免费视频成人精品丨亚洲综合色网站丨午夜精品美女久久久久av福利丨国产午夜人做人免费视频网站丨国产又黄视频丨97se狼狼狼狼狼亚洲网丨狠狠亚洲婷婷综合色香五月丨中国一级毛片黄丨国产女人十八毛片丨国产色视频在线播放丨国产亚洲精久久久久久无码苍井空丨天天摸日日摸爽爽狠狠丨久久综合香蕉国产蜜臀av

3708407
111111111111111
級別: 略有小成
精華主題: 0
發帖數量: 119 個
工控威望: 376 點
下載積分: 686 分
在線時間: 65(小時)
注冊時間: 2007-08-03
最后登錄: 2025-08-01
查看3708407的 主題 / 回貼
樓主  發表于: 2009-07-18 16:21
各位同仁:
大家好,
請大家幫助一下,誰能用VB寫一程序,讀寫PLC中的數據,例如將數某一數值,寫入PLC中的一個D元件中,固定向D0寫入數值,10進制的,一個數值輸入框,一個寫入按鈕,好像用到mscomm控件,雖然網上很多例子,但都很復雜,發來源代碼,不勝感激.謝謝.

xingshengwei
級別: *
精華主題: * 篇
發帖數量: * 個
工控威望: * 點
下載積分: * 分
在線時間: (小時)
注冊時間: *
最后登錄: *
查看xingshengwei的 主題 / 回貼
1樓  發表于: 2009-07-22 22:24
private sub command1_click()
       mscomm1.output=chr(2)+"1"+"1000"+text1.text+chr(3)+sum
end sub

sum是校驗和=chr(2)~chr(3)不包括chr(2)的字符串的ascii碼的16進制和的后兩位
如輸入數值為"1“則sum=31H+31H+30H+30H+30H+31H+03H=126H取后兩位字符="26"