日本特级淫片免费看-日本特级黄色-日本特级黄录像片-日本视频中文字幕-成年偏黄网站站免费-成年人福利

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

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

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)’取返回幀的數據,其度為Num1
   ReadData = ReturnStr  
   End If
  End Function
本帖最近評分記錄:
  • 下載積分:+2(夏日雪夢) 優秀文章
  • 本人在廈門..同行的朋友,可以加我QQ:784272323
    廈門鑫趣科技有限公司,主要從事回收、銷售、維修和租賃進口儀器儀表及其附件。

    主站蜘蛛池模板: 日日摸夜夜搂人人要 | 精品伊人 | 久久久久青草大香线综合精品 | 4h虎影库永久 | 毛片免费看网站 | 美女视频永久黄网站在线观看 | 日本精品久久久中文字幕 | 亚洲视频在线视频 | 国产永久在线视频 | 最新在线观看精品国产福利片 | 亚洲国产一区二区在线 | 四虎影视在线看免费观看 | 亚洲视频www| 久久这里知有精品99re66 | 国产精品v欧美精品v日韩 | 国产精品黄在线观看免费网站 | 精品久久久久国产 | 欧美性受 | 日本爱爱视频网站 | 日本精品卡一卡2卡3卡三卡四 | 91av在线网站 | 77788色淫网站免费观看 | 四虎在线精品免费高清在线 | 中文字幕日韩一区二区不卡 | 黄a视频在线观看 | 亚洲不卡一区二区三区在线 | 四虎在线最新地址公告 | 亚洲视频福利 | 国产小视频免费看 | 91免费看国产 | 97久久综合九色综合 | 亚洲三级精品 | 老子影院午夜伦不卡手机 | 亚洲欧美日韩综合一区 | 99久久综合给久久精品 | 亚洲人在线播放 | 欧美午夜三级 | 国产成+人欧美+综合在线观看 | a毛片免费播放全部完整 | 国产精品制服 | 你懂的网站在线观看 |