成人动漫在线观看 I 免费看大片a I 亚洲另类av I 久久精品视频一区 I 秋霞中文字幕 I 不卡视频一区二区 I 性色在线 I 爽妇综合网 I 黄色的一级片 I 美女靠逼app I 色播欧美 I 久色悠悠 I 日本久久黄色 I 非洲黑寡妇性猛交视频 I 亚洲乱码国产乱码精品精大量 I 看特级黄色片 I 一二三区在线播放 I 久久激情婷婷 I 欧美日韩国产成人精品 I 国产三级国产精品国产专区50 I 911视频完整版在线观看 I 色婷婷aⅴ一区二区三区 I 美女视频福利网站 I 操久久久久久 I 揉着我的奶从后面进去视频 I 各种少妇bbw撒尿484613 I 自拍偷拍 网站 I 亚洲人 屁股 鞭打网站

現象：現做個一個軟件實現和FX-PLC通訊。畫面功能和觸摸屏差不多，按鈕，讀寫數據都好用。但是有個毛病，我想實時讀PLC 的D中數據，可是我一點畫面按鈕后，讀D中的數據就不動了。請問怎么解決。不論我按什么鍵，它都一直讀D中的數據，不停。

是VB寫的軟件和PLC通訊嗎

是

你把VB程序發出來

Private Sub Timer3_Timer()
      If MSComm1.PortOpen = True Then
      Dim outstring As String
      Dim instring As String
      Dim d As Long
      Dim e As String
      Dim f As String
      MSComm1.OutBufferCount = 0
      MSComm1.InBufferCount = 0
      outstring = Chr(&H2) + "0" + "119002" + Chr(&H3) + "60"  '讀D200數據
      MSComm1.Output = outstring
      Do
         DoEvents
         Loop Until MSComm1.InBufferCount = 8
      MSComm1.InputMode = comInputModeText
      MSComm1.InputLen = 0
      instring = MSComm1.Input
      e = instring
      f = Mid(instring, 2, 4)
      d = CLng("&H" & f)
      Text5.Text = (d And &HFF00) \ &H100 + (d And &HFF) * &H100
      End If
      If Text5.Text = "1" Then
      Label2.Caption = "非常停止中"
      End If
      If Text5.Text = "2" Then
      Label2.Caption = "暫停中"
      End If
End Sub

Loop Until MSComm1.InBufferCount = 8
是 MSComm1.InBufferCount =8條件不成立
數據沒讀進來

讀出來了 ，只要不點畫面其他鍵，數據一直變化和PLC中D200同步，我聯機試了。但一點別的鍵就停止了。主要是怎么叫他不停！！

加一句
Timer3_Timer=FALSE

If MSComm1.PortOpen = True Then

還是那樣子哦，你那里人？

蘇州你呢

大連

吧MSComm1.InputLen = 0
去掉