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

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

主站蜘蛛池模板: 韩国一大片a毛片 | 久久精品一区二区三区不卡 | 大色综合 | 超清乱人伦中文视频在线 | 欧美久久一区二区三区 | 日韩精品一区在线观看 | 国产精品四虎在线观看免费 | 免费看黄色片网站 | 日韩在线视频在线 | 午夜精品18视频 | 97精品国产福利一区二区三区 | 99热精品久久只有精品黑人 | 欧美片免费观看网址 | 四虎影视永久在线 yin56xyz | 国产在线视频色综合 | 天天干天天玩 | 在线观看一区二区精品视频 | 天天爽夜夜操 | 一级香蕉视频在线观看 | 日本zzzzwww大片免费 | 久艹视频在线 | 日韩在线观看视频网站 | 日韩三级大片 | 福利在线观看 | 手机看片久久国产免费不卡 | 日本波多野结衣在线 | 天天色天| 美女视频黄网站 | 8090碰成年女人免费碰碰尤物 | 日韩欧美国产高清在线观看 | 9久9久女女免费精品视频在线观看 | 亚洲综合色就色手机在线观看 | 一级鲁丝片 | 自拍视频网 | 成人福利 | 免费看成人毛片 | 手机看片av | 干我好爽| 国产精品不卡无毒在线观看 | 欧美国产日韩1区俺去了 | 国产日韩欧美综合 |