无码精品人妻一区二区三区入口-无码精品人妻一区二区三区夜夜嗨-无码精品人妻一区二区三区颖A片-无码精品日本一区二区桃花岛-无码精品网站-无码精品一

  • «
  • 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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看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 分
在線時間: 161(小時)
注冊時間: 2015-07-02
最后登錄: 2025-02-04
查看abcdef張勇的 主題 / 回貼
11樓  發表于: 2015-08-14 14:27
吧MSComm1.InputLen = 0
去掉
  • «
  • 1
  • 2
  • »
  • Pages: 1/2     Go

主站蜘蛛池模板: 国产福利第一视频在线播放 | av无码天一区二区一三区 | 国产精品激情综 | 东京热男人av天堂 | 久久夜夜操妹子 | 久久精品成人一区二区三区 | 东北寡妇特级毛片免费免费漫画你懂得啦啦啦免费视频在线 | 丁香婷婷高清一区二区三区 | 国产精品无码一区二区三区毛片 | 国产欧美目韩91综合一区婷婷久久久 | 国产一区二区三区在线影院 | 中文字幕亚洲一区二区va在线 | 特级淫片aaaa毛片aa视频 | 综合啪啪 | 国产麻豆精品传媒a | 国产精品1024永久免费中国 | 国产成人无码视频一区二区三区 | 黑巨茎大战俄罗斯白人美女 | 丰满东北老熟女 | 一二三四精品免费视频 | av无码专区亚洲avl在线观看 | 国产成人无码影片在线观看 | 亚洲精品久久久久无码AV | 免费看的一级毛片 | 日韩一区二区精品久久高清 | 色狠狠色综合吹潮 | 91精品免费国产高清在线 | 国产香蕉尹人在线视频你懂的 | 99久久久久国产精品免费 | 国产一区二区免费在线观看 | 国产午夜片无码区在线观看爱情 | 亚洲国产欧美日本视频 | 日本免费一区二区在线看片 | 涩涩鲁亚洲精品一区二区 | 老熟妇高潮一区二区高清视频 | 久久精品天天爽夜夜爽 | 国产成人无码综合亚洲日韩榴莲 | 精产国品一区二区三产区 | 少妇人妻精品一区二区三区 | 精品少妇人妻仑乱免费看 | 四虎国产精品成人免费久久 |