免费国精产品自偷自偷免费看_在线看片成人_www.77伦理bt.com_特级黄色一级片_免费夜色污私人影院在线观看_国严精品久久久久久亚洲影视

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

  
    本系統(tǒng)以PC對基于PLC的交通燈控制系統(tǒng)的監(jiān)控為例,在上位機(jī)與PLC正常通信的前提下,設(shè)計如下界面。窗體的內(nèi)容主要包括,四大區(qū):端口、站號選擇區(qū),設(shè)定時間輸入?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 計算機(jī)與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)’取返回幀的響應(yīng)碼
   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
    廈門鑫趣科技有限公司,主要從事回收、銷售、維修和租賃進(jìn)口儀器儀表及其附件。

    主站蜘蛛池模板: 成人欧美一区二区三区男男 | 免费观看麻豆视频 | 人妻aⅴ中文字幕 | 久久久精品人妻一区二区三区蜜桃 | 国产一区二区三区精品一级毛片 | 91麻豆精品一区二区 | 国产情侣自拍小视频 | 国产美女二区 | 好紧好湿太硬了我太爽了 | 精品无码人妻被多人侵犯AV | 日韩在线第一区 | 越南毛茸茸的少妇 | 成人精品免费网站 | 中国熟妇露脸VIDEOS | 国产剧情亚洲福利 | avhd高清101在线谜片最新 | 免费看成人毛片无码视频 | videossexotv另类精品 | 18禁超污无遮挡无码免费动态图 | 亚洲伦产精品一区二区三区 | 全部免费毛片在线播放一个 | 黄色在线亚洲 | 蜜桃视频在线观看免费视频网站WWW | 久久的爱 | 伦理精品一区二区三精品 | 日本一级大毛片a一 | 惠民福利高清性色生活片免费播放网 | 欧美精品二区三区 | 浪潮色诱AV久久久久久久 | 男女午夜猛烈啪啦啦视频 | 动漫AV网站免费观看 | 113美女写真午夜一级观看 | 无码无套少妇毛多18p | 欧美jizzhd精品欧美 | 欧洲无线一线二线三线区别大吗 | 亚洲成A人片在线观看无码 一级毛片免费高清 | 香蕉狠狠 | 久久久老司机 | 久热在线视频 | 色屁屁草草影院ccyycom | 国产精品国产三级国产普通话三级 |