日本特级淫片免费看-日本特级黄色-日本特级黄录像片-日本视频中文字幕-成年偏黄网站站免费-成年人福利

緣分2013
級別: 探索解密
精華主題: 0
發帖數量: 12 個
工控威望: 145 點
下載積分: 392 分
在線時間: 37(小時)
注冊時間: 2013-06-26
最后登錄: 2019-08-22
查看緣分2013的 主題 / 回貼
樓主  發表于: 2013-10-08 20:11
RT,小弟由于剛接觸VB不久,用VB6.0與FX2N通訊,向PLC的D寫入值老是不對,不知道是不是格式不對,我是利用MSComm控件通訊的。。。outstring = Chr(&O2) + "1" + CStr(qiuhe) + "02" + CStr(xieru) + Chr(&O3) + hejiaoyan
緣分2013
級別: 探索解密
精華主題: 0
發帖數量: 12 個
工控威望: 145 點
下載積分: 392 分
在線時間: 37(小時)
注冊時間: 2013-06-26
最后登錄: 2019-08-22
查看緣分2013的 主題 / 回貼
1樓  發表于: 2013-10-09 15:38
回復3樓,為什么我把"0000"改成0001實際寫進去的數據是256,改成0002寫進去的數據是512,0000是需要寫進去的數據的16進制數據還是其他的關系?
緣分2013
級別: 探索解密
精華主題: 0
發帖數量: 12 個
工控威望: 145 點
下載積分: 392 分
在線時間: 37(小時)
注冊時間: 2013-06-26
最后登錄: 2019-08-22
查看緣分2013的 主題 / 回貼
2樓  發表于: 2013-10-10 17:13
謝謝你呀,昨天通過你這個代碼和我自己的結合找出了這個規律,現在還有個問題請教下,怎樣把動態的text.text賦給一個變量,意思就是通過一個函數比如說date(P),p是text的下標,然后把textp。text賦給一個變量,能實現嗎?
緣分2013
級別: 探索解密
精華主題: 0
發帖數量: 12 個
工控威望: 145 點
下載積分: 392 分
在線時間: 37(小時)
注冊時間: 2013-06-26
最后登錄: 2019-08-22
查看緣分2013的 主題 / 回貼
3樓  發表于: 2013-10-11 15:25
嗯,真的非常感謝你呀,還有個問題困擾了我好久了
Private Sub Timer2_Timer()
MSComm1.InBufferCount = 0  '設置讀緩沖區為空
MSComm1.OutBufferCount = 0  '設置寫緩沖區為空
outstring1 = Chr(&O2) + "0" + "0080" + "02" + Chr(&O3) + SUM_check1("0080", "02")
MSComm1.Output = outstring1
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 8
End Sub
把這個放在timer事件里面進行掃描,但是我用其他按鈕的單擊事件比如說
MSComm1.Output = Chr(&O2) + "7" + "0008" + Chr(&O3) + SUM_check2(7, "0008")
經常出現timer事件卡死,不知道是不是在使用單擊事件的時候跟
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 8
產生死循環,但是沒有這個釋放控制權的又無法正常掃描狀態,指導下。。。

主站蜘蛛池模板: 污视频网站在线| 亚洲国产精品日韩高清秒播| 国产丝袜制服在线| 国产九色在线播放| 在线亚洲天堂| 四虎影视库永久在线地址| 91精品国产亚一区二区三区| 中国的毛片| 免费看成人国产一区二区三区| 伊人久久综合网亚洲| 免费看一区二区三区| 成人手机在线| 综合色一色综合久久网vr| 欧美在线看欧美高清视频免费| 国产在线免| 日批视频免费观看| 欧美国产综合在线| 中文字幕a有搜索网站| 视频在线观看免费视频| www在线看| 你懂的网站在线| 欧美色亚洲| 自拍偷自拍亚洲精品被多人伦好爽| 青草草在线| 国产高清在线丝袜精品一区| 免费观看a黄一级视频| www.亚洲欧美| 欧美性猛| 在线免费色| 一个免费观看| 天天做天天爱夜夜爽女人爽宅| 国产精品久久精品| a性片| 四虎精品永久在线网址| www.尤物视频.com| 久久国产亚洲观看| 色姑娘桃花网| 中文字幕免费| 亚洲综合影视| 午夜小视频网站| 青草香蕉视频|