国产CHINESE男男GAYGAY免费网站_日本在线一区二区三区_欧美大屁股xxxx_国产xxx精品视频大全_一区二区视频国产_人人爱国产

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

  
    本系統(tǒng)以PC對基于PLC的交通燈控制系統(tǒng)的監(jiān)控為例,在上位機(jī)與PLC正常通信的前提下,設(shè)計(jì)如下界面。窗體的內(nèi)容主要包括,四大區(qū):端口、站號選擇區(qū),設(shè)定時(shí)間輸入?yún)^(qū),監(jiān)控顯示區(qū),控制按紐區(qū)。從站號選擇區(qū)選擇不同站號即不同PLC,實(shí)現(xiàn)對多個(gè)PLC的實(shí)時(shí)監(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ì)算機(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)’取返回幀校驗(yàn)碼
   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)口儀器儀表及其附件。

    主站蜘蛛池模板: 日本在线不卡免费视频 | 女同一区二区 | 中文字幕在线播放不卡 | 激情草逼 | 亚洲国产日韩精品 | 天天操导航 | 国产人妻精品午夜福利免费 | 啪啪中文字幕 | 少妇无码太爽了不卡视频在线看 | 狠狠操天天干 | 男女野外做爰全过程69影院 | 国产精品无码AV一区二区三区 | 国产高欧美性情一线在线 | 污污的网站在线免费观看 | 18出禁止看的啪视频网站 | 女人和拘做受大片免费看 | 艳妇乳肉豪妇荡乳后续丁字裤视频 | 熟女视频一区二区在线观看 | 黑人又大又粗弄得我好爽 | 无套内谢孕妇毛片免费看 | 精品bbwbbwbbwbbwbbwbbw| 国产视频一区在线 | a级黑人大硬长爽猛出猛进 成人精品影院 | 欧美激情性a片在线观看不卡 | 97视频播放| 久久精品美女视频 | 国产a免费一级视频 | 日韩中文字幕成人免费视频 | 人妻少妇精品久久 | 污污在线 | 免费草逼视频 | 日本免费高清色视频在线观看 | 午夜激情免费视频 | 免费观看18禁无遮挡真人网站 | 极品少妇xxxxⅹ免费视频 | 久久国产28| 大地视频在线观看免费高清 | 四虎成人免费在线 | 亚洲国产一区在线 | 亚洲精品人成网线在线播放VA | 久久精品国产亚洲av四虎 |