cadtlf
級(jí)別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 40 個(gè)
工控威望: 174 點(diǎn)
下載積分: 560 分
在線時(shí)間: 83(小時(shí))
注冊(cè)時(shí)間: 2013-06-17
最后登錄: 2024-12-04
查看cadtlf的 主題 / 回貼
樓主  發(fā)表于: 2016-04-24 21:14
小弟最近做做一個(gè)項(xiàng)目,要求用vb做為上位機(jī)與plc通信,本人以前只用過(guò)HMI,對(duì)VB不太孰悉,各位大蝦vb與plc如何通信呢.有沒(méi)有實(shí)例程序供小弟參考下.謝謝
gaoshanyeyun
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 51 個(gè)
工控威望: 245 點(diǎn)
下載積分: 366 分
在線時(shí)間: 228(小時(shí))
注冊(cè)時(shí)間: 2010-04-12
最后登錄: 2024-10-06
查看gaoshanyeyun的 主題 / 回貼
1樓  發(fā)表于: 2016-04-24 21:24
能不能具體一點(diǎn)呢
譬如 Lcpu WindowsXP 32 以太網(wǎng)口...
tingfenghu
級(jí)別: 工控俠客

精華主題: 0
發(fā)帖數(shù)量: 2846 個(gè)
工控威望: 3618 點(diǎn)
下載積分: 3519 分
在線時(shí)間: 3810(小時(shí))
注冊(cè)時(shí)間: 2007-11-04
最后登錄: 2024-12-22
查看tingfenghu的 主題 / 回貼
2樓  發(fā)表于: 2016-04-24 21:38
vb可以用MX ComponentV4,里面的控件編寫(xiě)比較容易,不用了解通訊協(xié)議,軟件里有例程。
二手PLC,觸摸屏,伺服驅(qū)動(dòng),各類(lèi)氣動(dòng)設(shè)備
http://shop58129605.taobao.com/
1019703271
級(jí)別: 正式會(huì)員
精華主題: 0
發(fā)帖數(shù)量: 5 個(gè)
工控威望: 92 點(diǎn)
下載積分: 576 分
在線時(shí)間: 11(小時(shí))
注冊(cè)時(shí)間: 2015-09-15
最后登錄: 2022-04-17
查看1019703271的 主題 / 回貼
3樓  發(fā)表于: 2016-04-24 22:04
往事如風(fēng)
科技改變制造
級(jí)別: 網(wǎng)絡(luò)英雄

精華主題: 0
發(fā)帖數(shù)量: 11284 個(gè)
工控威望: 18662 點(diǎn)
下載積分: 12397 分
在線時(shí)間: 2698(小時(shí))
注冊(cè)時(shí)間: 2013-01-31
最后登錄: 2024-12-21
查看往事如風(fēng)的 主題 / 回貼
4樓  發(fā)表于: 2016-04-25 08:23
論壇上已經(jīng)有大師發(fā)表過(guò)的,找找
三人行者必有我?guī)?,擇其善者而從之
sswater
sswater
級(jí)別: 網(wǎng)絡(luò)英雄

精華主題: 0
發(fā)帖數(shù)量: 688 個(gè)
工控威望: 11193 點(diǎn)
下載積分: 6310 分
在線時(shí)間: 541(小時(shí))
注冊(cè)時(shí)間: 2014-12-19
最后登錄: 2024-12-22
查看sswater的 主題 / 回貼
5樓  發(fā)表于: 2016-04-25 09:27
新項(xiàng)目用vb的應(yīng)該屬于比較奇葩的。不過(guò)vb確實(shí)挺好用的。
西門(mén)子smart解密。維綸還原exob ,mcgspro上傳密碼及期限解除,改畫(huà)面文字,步科歐姆龍屏禁止上傳反編譯,維控pi系列禁止上傳解鎖,繁易上傳,永宏c系列屏解密 wx:15972109203
liwenbin
自學(xué)PLC   同僚指點(diǎn)哦
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 392 個(gè)
工控威望: 469 點(diǎn)
下載積分: 969 分
在線時(shí)間: 352(小時(shí))
注冊(cè)時(shí)間: 2010-08-23
最后登錄: 2024-11-27
查看liwenbin的 主題 / 回貼
6樓  發(fā)表于: 2016-04-25 10:30
求教 假如我用FX3U-ENET-ADP 與VB連接呢 ,可否做一個(gè)簡(jiǎn)單一點(diǎn)的程序給我們看看(強(qiáng)調(diào)簡(jiǎn)單一點(diǎn)不然對(duì)初學(xué)者來(lái)說(shuō)看不懂)望各位前輩賜教,感激不盡
liuqiang2012
慎言慎行,三思而后行!
級(jí)別: 家園?
精華主題: 0
發(fā)帖數(shù)量: 304 個(gè)
工控威望: 505 點(diǎn)
下載積分: 967 分
在線時(shí)間: 550(小時(shí))
注冊(cè)時(shí)間: 2012-06-08
最后登錄: 2024-12-09
查看liuqiang2012的 主題 / 回貼
7樓  發(fā)表于: 2016-04-25 10:40
為什么不用LABVIEW呢?新手用VB估計(jì)要寫(xiě)死人。。。
搞工控不自學(xué)不行,因?yàn)槟阋惶觳粚W(xué)你就落后了,這就是這個(gè)行業(yè)的特點(diǎn)
liwenbin
自學(xué)PLC   同僚指點(diǎn)哦
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 392 個(gè)
工控威望: 469 點(diǎn)
下載積分: 969 分
在線時(shí)間: 352(小時(shí))
注冊(cè)時(shí)間: 2010-08-23
最后登錄: 2024-11-27
查看liwenbin的 主題 / 回貼
8樓  發(fā)表于: 2016-04-25 12:08
引用
引用第7樓liuqiang2012于2016-04-25 10:40發(fā)表的  :
為什么不用LABVIEW呢?新手用VB估計(jì)要寫(xiě)死人。。。




LABVIEW可以做一個(gè)程序看看不
shuangyu
工控行業(yè)呆的越久越迷茫.......懂得多?少?......
級(jí)別: 家園?
精華主題: 0
發(fā)帖數(shù)量: 344 個(gè)
工控威望: 891 點(diǎn)
下載積分: 1083 分
在線時(shí)間: 115(小時(shí))
注冊(cè)時(shí)間: 2009-08-04
最后登錄: 2024-07-12
查看shuangyu的 主題 / 回貼
9樓  發(fā)表于: 2016-04-25 15:05
    Function NewPLCFXENTE(ByVal PortNum As String) As Object
        Try
            Dim PLCFX As New ActProgTypeLib.ActProgType
            Dim PLCType As Integer = 520
            Dim PLCUnitType As Integer = 74
            Dim PLCUnitNumber As Integer = 0
            Dim PLCPrgType As Integer = 5
            Dim PLCHostAddress As String = ""
            Dim PLCTimeOut = 500


            With PLCFX
                .ActCpuType = PLCType
                .ActUnitType = PLCUnitType
                .ActUnitNumber = PLCUnitNumber
                .ActProtocolType = PLCPrgType
                ' .ActHostAddress = "192.168.1." & PortNum
                .ActHostAddress = PortNum
                .ActTimeOut = PLCTimeOut
            End With

            Return PLCFX
        Catch ex As Exception
            MsgBox(ex.Message)
            MLog.LogErrWrite(ex.ToString)
        End Try

    End Function

  PLC0 = PLCM.NewPLCFXENTE(IPAddress(0))
            PLCConErr(0) = PLC0.Open
liwenbin
自學(xué)PLC   同僚指點(diǎn)哦
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 392 個(gè)
工控威望: 469 點(diǎn)
下載積分: 969 分
在線時(shí)間: 352(小時(shí))
注冊(cè)時(shí)間: 2010-08-23
最后登錄: 2024-11-27
查看liwenbin的 主題 / 回貼
10樓  發(fā)表于: 2016-04-27 07:49
引用
引用第9樓shuangyu于2016-04-25 15:05發(fā)表的  :
    Function NewPLCFXENTE(ByVal PortNum As String) As Object
        Try
            Dim PLCFX As New ActProgTypeLib.ActProgType
            Dim PLCType As Integer = 520
            Dim PLCUnitType As Integer = 74
.......

你這行代碼是以太網(wǎng)的嗎
shuangyu
工控行業(yè)呆的越久越迷茫.......懂得多?少?......
級(jí)別: 家園?
精華主題: 0
發(fā)帖數(shù)量: 344 個(gè)
工控威望: 891 點(diǎn)
下載積分: 1083 分
在線時(shí)間: 115(小時(shí))
注冊(cè)時(shí)間: 2009-08-04
最后登錄: 2024-07-12
查看shuangyu的 主題 / 回貼
11樓  發(fā)表于: 2016-04-27 10:11
是的,適用于FX3U-ENET-ADP 模塊;其他端口可能設(shè)置參數(shù)不一樣
本帖最近評(píng)分記錄:
  • 下載積分:+5(liwenbin)