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

關(guān)于VB的MSComm串口接收兩次,Time事件 10分



如下:(1)和(2)單獨(dú)用按鈕命令可以正常執(zhí)行..用Timer1執(zhí)行1和Timer2執(zhí)行2,收回來(lái)的數(shù)據(jù)就很亂..把(1)(2)都寫(xiě)到Timer1下面下,收回來(lái)的數(shù)據(jù)也亂..是不是輸入輸出緩沖區(qū)兩個(gè)混亂

Private Sub Timer1_Timer() '時(shí)鐘事件,間隔設(shè)定Interval毫秒就執(zhí)行一次

(1)DIM SENTDATA AS STRING,,Dim getdata
MSComm1.InBufferCount = 0 '清空接收緩沖區(qū)
MSComm1.OutBufferCount = 0 '清空發(fā)送緩沖區(qū)
MSComm1.Output = 讀取數(shù)據(jù)指令
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 20 'PLC應(yīng)該返回8個(gè)字符 固定的4+2*N
'一個(gè)起始符+一個(gè)寄存器(有兩個(gè)字節(jié))(每個(gè)字節(jié)=2字符)+一個(gè)結(jié)束符+兩個(gè)校驗(yàn)和
getdata = MSComm1.Input
Text1.Text = getdata ''返回的低字節(jié)在前,高在后

(2)Dim sendat As String,,Dim getdat
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
MSComm1.Output =讀取數(shù)據(jù)指令
Do
DoEvents
Loop Until MSComm1.InBufferCount >= 8
getdat = MSComm1.Input
Text4.Text = getdat ''返回的低字節(jié)在前,高在后

我做過(guò)一個(gè)讀三菱的PLC的VB程序,用時(shí)間同樣出這樣的問(wèn)題,問(wèn)別人原因說(shuō)是用TIMER事件接收與發(fā)送的時(shí)候產(chǎn)生了沖突.....

在電腦上裝上三菱的MX C0MPEMT軟件，在VB中找到相應(yīng)的控件來(lái)做通訊非常方便，可以批量讀取PLC的M、X、Y的狀態(tài)，也可以直接將數(shù)值寫(xiě)入到PLC的數(shù)據(jù)寄存器里。

你發(fā)送什么命令？校驗(yàn)碼那些對(duì)不對(duì)？亂那些又是返回那些信息？

直接把X轉(zhuǎn)成M然后讀，不就可以解決了么？