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

緣分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
產生死循環,但是沒有這個釋放控制權的又無法正常掃描狀態,指導下。。。

主站蜘蛛池模板: 亚洲欧洲国产经精品香蕉网 | 在线污视频 | 四虎国内精品一区二区 | 亚洲免费福利视频 | wwwxx在线观看| 亚州视频在线 | 91网站免费看 | 五月天在线免费视频 | 国产在线精品成人一区二区三区 | 亚洲精品视频在线 | 不卡高清av手机在线观看 | 黄色ww| 五月六月丁香 | 91精选视频在线观看 | 亚洲综合国产一区二区三区 | 黄色在线视频观看 | 福利影院第一页 | 久久yy| 亚洲成a人一区二区三区 | 欧美一级欧美三级 | 久热这里 | 国产一级视频久久 | 四虎免费在线视频 | 久久97精品久久久久久久不卡 | 亚洲成人免费在线观看 | 日日添天天做天天爱 | 亚洲国产精品激情在线观看 | 国产欧美二区 | 伊人网久久网 | 在线免费播放 | 亚洲成在人线影视天堂网 | sihu永久在线播放地址 | 国内精品视频一区二区三区 | www.色在线观看 | a级aaaaaaaa毛片| 欧美一区二区三区久久久 | a在线观看免费视频 | 亚洲区精品 | 亚洲综合一区二区三区四区 | 美女美女大片黄a大片 | 四虎综合网 |