99久久国产综合精品女不卡-99久久好看一级毛片-99久久精品99999久久-99久久精品费精品国产-99久久精品费精品国产一区二

  • «
  • 1
  • 2
  • »
  • Pages: 1/2     Go
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
樓主  發表于: 2015-08-14 13:11
現象:現做個一個軟件實現和FX-PLC通訊。畫面功能和觸摸屏差不多,按鈕,讀寫數據都好用。但是有個毛病,我想實時讀PLC 的D中數據,可是我一點畫面按鈕后,讀D中的數據就不動了。請問怎么解決。不論我按什么鍵,它都一直讀D中的數據,不停。
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
1樓  發表于: 2015-08-14 13:23
是VB寫的軟件和PLC通訊嗎
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
2樓  發表于: 2015-08-14 13:24
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
3樓  發表于: 2015-08-14 13:41
你把VB程序發出來
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
4樓  發表于: 2015-08-14 13:46
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
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
5樓  發表于: 2015-08-14 14:03
Loop Until MSComm1.InBufferCount = 8
是 MSComm1.InBufferCount =8條件不成立
數據沒讀進來
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
6樓  發表于: 2015-08-14 14:07
讀出來了 ,只要不點畫面其他鍵,數據一直變化和PLC中D200同步,我聯機試了。但一點別的鍵就停止了。主要是怎么叫他不停!!
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
7樓  發表于: 2015-08-14 14:11
加一句
Timer3_Timer=FALSE

If MSComm1.PortOpen = True Then
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
8樓  發表于: 2015-08-14 14:17
還是那樣子哦,你那里人?
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
9樓  發表于: 2015-08-14 14:22
蘇州你呢
小學沒畢業
級別: 略有小成
精華主題: 0
發帖數量: 88 個
工控威望: 257 點
下載積分: 389 分
在線時間: 31(小時)
注冊時間: 2013-05-14
最后登錄: 2024-05-17
查看小學沒畢業的 主題 / 回貼
10樓  發表于: 2015-08-14 14:26
大連
abcdef張勇
工控
級別: 探索解密
精華主題: 0
發帖數量: 101 個
工控威望: 173 點
下載積分: 6873 分
在線時間: 166(小時)
注冊時間: 2015-07-02
最后登錄: 2025-07-17
查看abcdef張勇的 主題 / 回貼
11樓  發表于: 2015-08-14 14:27
吧MSComm1.InputLen = 0
去掉
  • «
  • 1
  • 2
  • »
  • Pages: 1/2     Go

主站蜘蛛池模板: 日韩中出| 国产精品久久久久久久久电影网 | 91 视频网站| 久久久久久在线| 午夜国产精品免费观看| a级粗大硬长爽猛视频免费| 日韩福利在线视频| 色片免费看| 欧美久久伊人| 国产自产自拍| 河南毛片| 黄网免费观看| 精品国产自在现线久久| 国产精品久久久久久久久久日本| 久久综合草| 日本国产精品| 亚洲福利秒拍一区二区| 伊人情涩网| 91久久精品视频| 国产免费一区二区三区在线观看 | 黄色aa| 91精品欧美一区二区综合在线| 国产乳摇福利视频在线观看| 欧美人成在线观看网站高清| 图片区 日韩 欧美 亚洲| 亚洲一区二区三区日本久久九| 99av在线| 91精品国产自产91精品| 一级黄a| 一级欧美一级日韩毛片99| 尤物精品视频| 日韩在线视频网| 牛牛影院成人免费网页| 国产在线视欧美亚综合| 国产精品东北一极毛片| 视频福利网| 夜夜爱成人免费网站| 黄色在线视频播放| 国内精品久久久久久西瓜色吧| 麻豆视传媒一区二区三区| 日本亚洲国产精品久久|