2025最新热门电视排行榜-2025最新上映电影-2025最新院线大片抢先看-2025最新在线观影网站-2048国产精品原创综合在线-23部人禽伦

zhidaoshenmo
雖然我們不是“富二代”,但是我們還有成為“富一代”的機會。
級別: 家園常客
精華主題: 0
發(fā)帖數(shù)量: 559 個
工控威望: 638 點
下載積分: 1175 分
在線時間: 309(小時)
注冊時間: 2009-04-16
最后登錄: 2017-10-25
查看zhidaoshenmo的 主題 / 回貼
樓主  發(fā)表于: 2009-12-31 23:04

  
    本系統(tǒng)以PC對基于PLC的交通燈控制系統(tǒng)的監(jiān)控為例,在上位機與PLC正常通信的前提下,設計如下界面。窗體的內容主要包括,四大區(qū):端口、站號選擇區(qū),設定時間輸入?yún)^(qū),監(jiān)控顯示區(qū),控制按紐區(qū)。從站號選擇區(qū)選擇不同站號即不同PLC,實現(xiàn)對多個PLC的實時監(jiān)控。

3.1 串口初始化程序

  If MSComm1.PortOpen <> True Then
  MSComm1.PortOpen=True
  End If
  MSComm1.Settings=“9600,E,7,2”
  MSComm1.InputLen=0
  MSComm1.InBufferCount=0
  MSComm1.InputMode=comInputModeText
  MSComm1.Handshaking=comNone

3.2 計算機與PLC通信的VB程序
  
Public Function ReadData(ByVal InputStr As String, ByVal Num1 As Integer, ByVal Num2 As Integer) As String




   Dim OutputStr As String
   Dim InString As String
   Dim ReturnStr As String
   Dim EndString As String
   Dim FCSString As String
   Dim ReturnFCSString As String
   Form1.MSComm1.InBufferCount=0
   OutputStr=InputStr+FCS(InputStr)+“*”
   If Form1.MSComm1.PortOpen=True Then
   Form1.MSComm1.Output=OutputStr+Chr$(13)’按照PLC幀格式輸出
   End If
   Do
   DoEvents
   Loop Until Form1.MSComm1.InBufferCount >=Num2’返回幀的長度
   InString=Form1.MSComm1.Input
   EndString=Mid$(InString,6,2)’取返回幀的響應碼
   If EndString <> “00”Then
   ReadData=“Error”
   Exit Function
   End If
   EndString=Mid$(InString,1,Len(InString)-4)  
   ReturnFCSString=Mid$(InString, Len(InString) -3,2)’取返回幀校驗碼
   FCSString=FCS(EndString)  
   If FCSString <> ReturnFCSString Then
   ReadData=“Error”
   Exit Function
   End If
   If Len(InString)>=Num2 Then
   ReturnStr=Mid$(InString, Len(InString)-Num1-3, Num1)’取返回幀的數(shù)據(jù),其度為Num1
   ReadData = ReturnStr  
   End If
  End Function
本帖最近評分記錄:
  • 下載積分:+2(夏日雪夢) 優(yōu)秀文章
  • 本人在廈門..同行的朋友,可以加我QQ:784272323
    廈門鑫趣科技有限公司,主要從事回收、銷售、維修和租賃進口儀器儀表及其附件。

    主站蜘蛛池模板: 网站国产 | 华人亚洲欧美精品国产 | 中文在线欧美亚洲制服 | 激情五月综合网 | 天美传媒果冻传媒国产电影 | 污软件不收费软 | 日韩精品一区二区三区中文3d | 久女女热精品视 | 1区2区3区高清视频 色老大综合 | 国产一区日韩二区欧美三 | 亚洲成v人片在线观看 | 欧美综合激情网 | 手机免费在线观看日韩电影 | 午夜视频在线播放 | 人伦小说视频在线 | 一区二区免费国产在线观看 | 国产迷姦播 | 欧美交a欧美精品喷水 | 亚洲天堂一区 | 亚洲国产不卡一区二区三区 | 国产精品一区二区制服 | 亚洲mv大片欧洲mv大片入口 | 婷婷亚洲久悠悠色在线播放 | 精品一区二区三区在线观看视 | 免费国产va在 | 蜜芽tv国产在 | 手机大看福利永久国产 | 国产精彩香蕉在线视频 | 国产精品va欧美精品 | 麻花豆传媒剧国 | 国产亚洲玖玖精品 | 亚洲精品 | 亚洲v国产v日韩v欧美v | 精品国产一区二区 | 欧美手机手机在线视频一区 | www.亚洲最大夜色伊人 | 亚洲无线码一区国产欧美国日产 | 日韩国产免费一区二区三区 | 一二三四在线观看免费中文吗中文 | 国产激情在线观看免费视频 | 亚洲人成中文字幕在线观看 |