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

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

主站蜘蛛池模板: 不卡久久 | 久久精品国产欧美成人 | 国产精品深夜福利免费观看 | 国产成人精选免费视频 | 久操中文在线 | 97精品伊人久久久大香线焦 | 欧美在线精品一区二区三区 | aa级黄色毛片 | 亚洲久热 | 在线不卡一区二区三区日韩 | 4虎影院在线观看 | 色综合第一页 | 欧美色第一页 | 亚洲欧美在线综合一区二区三区 | 国产精品亚洲片在线观看不卡 | www.亚洲国产 | 44444色视频在线观看 | 亚洲精品视频免费观看 | www欧美com| 在线观看色网站 | 在线加勒比 | 黄色片网站免费在线观看 | 亚洲码一区二区三区 | 91福利视频免费 | 日韩久久中文字幕 | 国产 欧美 日产中文 | 精品国产欧美一区二区最新 | 大香焦久久| 一本色道久久88综合亚洲精品高清 | 国产特黄特色的大片观看免费视频 | 国产美女视频免费 | 亚洲高清影院 | 国产成人免费网站在线观看 | 国产欧美日韩精品一区二 | 色桃花网 | 亚洲美女在线视频 | 亚洲国产情侣偷自在线二页 | 午夜精品久久久久久久久 | 深夜影院破解版免费vip | 国产欧美日韩图片一区二区 | 欧美大片网址 |