成人精品一区二区久久久 I 国产美女永久无遮挡 I 中文字幕+乱码+中文字幕明步 I 国产在视频一区二区三区吞精 I 日韩精品小视频 I 成人性生交大片免费4 I 免费aaa级毛片在线视频 I 一级片毛片 I 大型成人社区 I 国模在线播放 I 欧美大荫蒂毛茸茸视频 I 偷偷色噜狠狠狠狠的777米奇 I www.久久亚洲 I 日日搞夜夜操 I 亚洲成色777777女色窝 I 毛片黄色毛片 I 午夜片在线观看 I 国产一区二区三区中文字幕 I 天天干夜夜骑 I 日韩在线视频一区二区三区 I 久久久无码精品亚洲a片0000 I 写真福利片hd在线播放 I 欧美成人一区二免费视频 I 色噜噜狠狠爱综合视频 I 中文字幕无线码免费人妻 I 国产精品久久久久久久久久不蜜臀 I 欧美综合人人做人人爱 I 1024成人网色www I 国产精品视频一二三区 I 亚洲免费美女视频

關于VB的MSComm串口接收兩次,Time事件 10分



如下:(1)和(2)單獨用按鈕命令可以正常執行..用Timer1執行1和Timer2執行2,收回來的數據就很亂..把(1)(2)都寫到Timer1下面下,收回來的數據也亂..是不是輸入輸出緩沖區兩個混亂

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

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

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

在電腦上裝上三菱的MX C0MPEMT軟件，在VB中找到相應的控件來做通訊非常方便，可以批量讀取PLC的M、X、Y的狀態，也可以直接將數值寫入到PLC的數據寄存器里。