91黄动漫 I 欧美 日韩 国产 成人 在线 I a级成人毛片 I 农村黄色片 I 男生捅女生的肌肌 I 精品99一区二区三区 I 妃光莉av I 日日夜夜操操 I 性中国古装videossex I 久久不卡av I 美女高潮动态图 I 极品美女开粉嫩精品 I 牛牛精品一区二区 I 91精品福利视频 I 成人刺激视频 I 91国内精品视频 I 中国一级特黄毛片大片 I 校长狠狠挺进校花体内小说 I 欧美激情黄色片 I 欧美久久久一区 I 爱豆国产剧免费观看大全剧苏畅 I 麻豆国产人妻欲求不满谁演的 I 亚洲一区二区在线免费观看视频 I 国产超碰av人人做人人爽 I 精品国产第一国产综合精品 I 久久免费看av I 欧美一区二区三区白人 I 国产精品夫妻激情 I 校花被肉干高h潮不断 I 欧美最猛黑人xxxx黑人表情 I 国产欧美日韩一区二区搜索 I 极品女神露脸呻吟啪啪 I 人人天天久久 I 亚洲动漫在线 I 日本91福利区 I 五月天 桃色 开心 I av在线免费观看国产 I 男人添女人的免费视频 I 夜夜穞天天穞狠狠穞

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

是VB寫的軟件和PLC通訊嗎

是

你把VB程序發(fā)出來

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數(shù)據(jù)
      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條件不成立
數(shù)據(jù)沒讀進來

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

加一句
Timer3_Timer=FALSE

If MSComm1.PortOpen = True Then

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

蘇州你呢

大連

吧MSComm1.InputLen = 0
去掉