91美女视频-亚洲免费观看视频-欧美a∨-久热在线视频-日韩黄网站-成av人片在线观看www-久操综合-超碰av在线播放-性欧美欧美巨大69-婷婷二区-av男人的天堂网-中文字幕一区在线播放-玖草在线观看-国产网址在线观看-免费在线不卡av

hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
樓主  發(fā)表于: 2011-05-03 09:53
上位機(jī) 我打算用一般的pc機(jī) 現(xiàn)在需要跟電腦通信的有 三菱plc(加一個(gè)溫度模塊),還有一款數(shù)字千分表(很精密的) 表附帶一根RS232通信線,目前我只知道表的通信格式字,其他一無所知,各位大俠 怎么實(shí)現(xiàn)pc與plc的通信 還有pc與數(shù)字千分表的? 上位機(jī)用戶軟件我打算用vb 來編寫,大家看這樣行得通不 ?
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
1樓  發(fā)表于: 2011-05-03 10:17
1樓真的嗎? 我馬上加qq 謝謝 三克油啊。
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
2樓  發(fā)表于: 2011-05-03 10:19
2樓 組態(tài)軟件我是不想用了 我用過昆侖組態(tài)用起來是方便當(dāng)時(shí)總感覺 不好有缺點(diǎn) 所以我才改成這樣的。我已經(jīng)做過一套了。
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
3樓  發(fā)表于: 2011-05-04 10:48
昨天開始 寫今天 初步寫了個(gè)代碼不過指令發(fā)出好像plc沒有回應(yīng) 有懂vb的嗎幫我看看
Private Sub Command1_Click()
Dim OutString As String
Dim InString As String
MSComm1.OutBufferCount = 0
MSComm1.InBufferCount = 0
OutString = Chr(2) + "0" + "10f604" + Chr(3) + "74"
MSComm1.Output = OutString
Text1.Text = OutString
Do
  DoEvents
  Loop Until MSComm1.InBufferCount = 12
  InString = MSComm1.Input
  Text2.Text = InString

End Sub

Private Sub Form_Load()

MSComm1.CommPort = 3
MSComm1.Settings = "9600,e,7,1"
MSComm1.PortOpen = True

End Sub
hsyyqq
級別: *
精華主題: * 篇
發(fā)帖數(shù)量: * 個(gè)
工控威望: * 點(diǎn)
下載積分: * 分
在線時(shí)間: (小時(shí))
注冊時(shí)間: *
最后登錄: *
查看hsyyqq的 主題 / 回貼
4樓  發(fā)表于: 2011-05-04 17:53
圖片:
圖片:
好吧在完全不懂的情況下我自己摸索出來了 哈哈今天總算是把數(shù)據(jù)讀出來了 我在網(wǎng)上下了個(gè)樣例程序就是樓上的結(jié)果plc沒有返回 我又不懂調(diào)試vb這樣的程序 后來我想到一個(gè)解密用的串口工具 把讀取d123 開始的4位數(shù)據(jù)寄存器數(shù)據(jù) 指令格式是02h30h31h30h46h36h30h34h03h37h34h 結(jié)果發(fā)出去得到\STX64000000\ETX8D 中間那個(gè)64000000就是d123 d124 d125 d126的內(nèi)容了 我實(shí)現(xiàn)在plc里往d123寫入了k100其他就沒動(dòng)。后來我發(fā)現(xiàn)vb程序里是不是寫入失敗了就換了一種方式 不照抄 網(wǎng)上的樣例程序了,修改一下


  Private Sub Command1_Click()
Dim OutString(10) As Byte
Dim InString() As Byte
MSComm1.OutBufferCount = 0
MSComm1.InBufferCount = 0
OutString(0) = &H2
OutString(1) = &H30
OutString(2) = &H31
OutString(3) = &H30
OutString(4) = &H46
OutString(5) = &H36
OutString(6) = &H30
OutString(7) = &H34
OutString(8) = &H3
OutString(9) = &H37
OutString(10) = &H34
MSComm1.Output = OutString
Text1.Text = OutString
Do
  DoEvents
  Loop Until MSComm1.InBufferCount = 12
  InString = MSComm1.Input
  Text2.Text = InString
End Sub

Private Sub Form_Load()
MSComm1.CommPort = 3
MSComm1.Settings = "9600,e,7,1"
MSComm1.PortOpen = True
End Sub
寫進(jìn)去之后發(fā)現(xiàn)返回出來的數(shù)據(jù)跟我用串口工具調(diào)試的一樣 那么說成功了
本來很簡單的東西 不過我發(fā)現(xiàn)vb里數(shù)制什么的好多東西我都忘記了  搞不清楚現(xiàn)在 不過今天是老牛啃草 居然試出來了難道我跟美女聊一下天就有靈感了
另外求師傅一名 幫幫我

主站蜘蛛池模板: 国产一级大片在线观看 | 黄色动漫免费在线观看 | 久久久一级片 | 国产尤物av | www.国产精品视频 | 潘金莲一级淫片aaaaaa播放 | 舔花蒂| 四虎影院成人 | 日日噜 | 99国产精品久久久久久久 | 蜜桃导航-精品导航 | 三级久久| 夜夜操夜夜爱 | 青娱乐最新地址 | 国产精品一卡二卡 | 中文在线一区二区三区 | 91日韩视频 | 可以在线看黄的网站 | 成人毛片在线免费观看 | 久草视频免费播放 | 国产麻豆乱码精品一区二区三区 | 麻豆传媒一区 | 在线观看成人动漫 | 一级片一区二区三区 | 国产手机看片 | 黄色在线视频网站 | 亚洲精品一区二区三区在线 | 国产高潮又爽又无遮挡又免费 | 香蕉视频在线看 | 天天色综 | 2019最新中文字幕 | 日韩黄页网站 | 国产破处视频 | 国外亚洲成av人片在线观看 | 国产婷婷色一区二区三区 | 日韩少妇裸体做爰视频 | 亚洲精品无码久久久久久久 | 亚洲免费观看高清完整 | 91蜜桃在线观看 | 白嫩情侣偷拍呻吟刺激 | 国产自偷 | 日韩欧美二区三区 | av网址在线 | 日本免费不卡视频 | 在线免费色| 99久久精| 日本超碰 | 欧美激情xxx | 欧美三日本三级少妇三99 | 一级二级在线观看 | 精品国产乱码久久久久久郑州公司 | 大奶子情人 | 亚洲激情第一页 | 日本在线视频不卡 | 国产福利在线 | 亚洲一区中文字幕 | 午夜影院在线观看视频 | 国产欧美在线播放 | 91在线精品秘密一区二区 | 99福利视频 | 国产精品无码成人网站视频 | 午夜影院在线观看 | 暖暖免费观看日本版 | 99国产视频 | 又色又爽又黄无遮挡的免费视频 | 日本精品在线视频 | 亚洲老妇色熟女老太 | 芭乐视频色 | free性丰满69性欧美 | 国产区一区二区三 | 天天色图片 | 偷拍亚洲欧美 | 男女做爰猛烈高潮描写 | 超碰伦理 | 日韩欧美国产网站 | 爆操巨乳 | 国产女主播福利 | 五月天精品在线 | 美女被爆操网站 | 国产区一二三 | 夜夜天堂 | 亚洲欧美制服丝袜 | 欧美日韩爱爱 | 逼特逼在线视频 | 欧美激情图区 | 日本三级一区 | 丰满岳妇伦在线播放 | 亚洲国产欧美在线观看 | 午夜在线观看视频 | 夜夜爽夜夜 | 老熟女一区二区三区 | 欧美极品少妇xxxxⅹ免费视频 | 在线视频一区二区三区四区 | 国产二区视频在线观看 | 日本中文字幕在线看 | 伊人春色在线观看 | 亚洲精品乱码久久久久久蜜桃麻豆 | 男人操女人下面 | 亚洲成人看片 |