vb.net设置opc vbnet console

vb.net如何建立OPC通讯读取WINCC中的变量值

您好，我用过的是S7-200 PLC与WINCC通讯，两者通讯必须使用西门子提供的软件PC_ACCESS。在PC_ACCESS中建立变量，地址要与PLC变量地址对应。然后通过wincc的OPC服务器添加PC_ACCESS里面的变量即可。这样WINCC就和PLC变量链接上了！

相关问答

Q1: VB.NET的OPC读取西门子PLC数值转换

12601, 转换成16进制是3139，16进制 ASC吗31对应字符1， 39对应9。 后面的用这个思路去转换就对上了。

0001 2569这两个应该是和格式相关的字符。0001一般就是开始的意思。

一个变量包含两个字符，转换算法如下。

1。 取高位字符，除以H100， H是VB中16进制表示法。 除以H100效果是右移8位。 位了保险起见，再和H00FF做与运算，保证取得的ASC码是合法的。

2。取低位字符，与H00FF做与运算，去掉高位数据，剩下的就是低位ASC码。

3。将ASC码转换为字符，用CHR函数即可，然后连接所有的字符即可得String

Q2: 关于VB.NET 的AddressOf 问题

你好，EnableDisconnectNotification、 EnableWriteNotification 这两个是外部函数吧，是委托吗？

建议使用委托可以看看下面的例子

此示例演示如何使用委托将过程传递给另一个过程。

委托是一种类型，与任何其他类型一样可在 Visual Basic 中使用。AddressOf 运算符如果应用到一个过程名，则返回一个委托对象。

此示例有一个具有委托参数的过程，该委托参数可接受对另一个过程的引用，而引用则是通过 AddressOf 运算符获得的。

创建委托和匹配过程

创建一个名为 MathOperator 的委托。

Visual Basic

复制代码

Delegate Function MathOperator( _

ByVal x As Double, _

ByVal y As Double _

) As Double

创建一个名为 AddNumbers 的过程，其参数和返回值与 MathOperator 的参数和返回值匹配，以使签名匹配。

Visual Basic

复制代码

Function AddNumbers( _

ByVal x As Double, _

ByVal y As Double _

) As Double

Return x + y

End Function

创建名为 SubtractNumbers 的过程，其签名与 MathOperator 匹配。

Visual Basic

复制代码

Function SubtractNumbers( _

ByVal x As Double, _

ByVal y As Double _

) As Double

Return x - y

End Function

创建一个名为 DelegateTest 的过程，它接受一个委托作为参数。

此过程可接受对 AddNumbers 或 SubtactNumbers 的引用，这是因为它们的签名与 MathOperator 签名匹配。

Visual Basic

复制代码

Sub DelegateTest( _

ByVal x As Double, _

ByVal op As MathOperator, _

ByVal y As Double _

)

Dim ret As Double

ret = op.Invoke(x, y) ' Call the method.

MsgBox(ret)

End Sub

创建一个名为 Test 的过程，它使用 AddNumbers 的委托作为参数调用 DelegateTest 一次，然后使用 SubtractNumbers 的委托作为参数再次调用。

Visual Basic

复制代码

Protected Sub Test()

DelegateTest(5, AddressOf AddNumbers, 3)

DelegateTest(9, AddressOf SubtractNumbers, 3)

End Sub

调用 Test 时，它首先显示 AddNumbers 对 5 和 3 的操作结果，也就是 8。然后显示 SubtractNumbers 对 9 和 3 的操作结果，也就是 6。

创建一个名为 MySubDelegate 的委托。

Delegate Sub MySubDelegate(ByVal x As Integer)

声明一个类，该类包含与该委托具有相同签名的方法。

Class class1 Sub Sub1(ByVal x As Integer) MsgBox("The value of x is: " CStr(x)) End Sub End Class

定义一个方法，该方法创建该委托的实例并通过调用内置的 Invoke 方法调用与该委托关联的方法。

Protected Sub DelegateTest() Dim c1 As New class1 ' Create an instance of the delegate. Dim msd As MySubDelegate = AddressOf c1.Sub1 ' Call the method. msd.Invoke(10) End Sub

Q3: 如何使用SIMATIC NET实现OPC UA冗余服务器的通信

1、 OPC服务介绍

西门子提供的最新软件：Simatic Net PC-Software CD 2005为各种组态软件的开发提供了一个统一的平台，它建立的PC站既为一些组态软件，如：WinCC、Protol等提供了与PLC的通讯平台，也提供了一套编程接口，可使用高级语言编程通过Simatic Net访问PLC数据。本文讨论的主要就是这个编程接口,最新版的Simatic NET支持五种编程方式：

1、ActiveX控件

提供了一系列数据访问控件，以便于向VB6这种语言使用控件的方式与PLC通讯。

2、OPC自动化

为VB6、Dephi等语言运用OLE 自动化的方式进行编程。

3、OPC用户接口

这是专门为VC++提供的一种高效编程方式，其灵活程度与执行效率比前面的两种方式均要高得多。

4、针对微软的.NET平台的OPC用户接口

这也是一种非常灵活的编程接口，不过它针对的是.NET平台，其提供了大量的.NET类库，以便于像VC#、VB.NET等高级语言编程。本文将详细的介绍该接口。

5、OPL XML接口

顾名思义，主要是针对XML编程的。

对于2、3、4编程方式，他们各自又可以分为同步访问方式和异步访问方式。按西门子的文档解释：同步通讯指的是当一个客户在访问服务器时，其他客户的访问必须等待，直到服务器处理完该客户的请求，才能继续进行下一个服务，异步访问与之正好相反，本文主要讲的是同步编程篇，异步篇以后再提供。

2、 配置OPC服务器

要进行编程，必须先配置服务器。本文以Prfibus DP网络为例，介绍PC站的配置。其内容主要来自西门子文档。

需要的软件：

Step7 V5.3

Simatic Net PC-Software CD 2005

需要的硬件：

至少为CP5611或以上级别，笔记本可以为CP5511,带DP口的S7-300 PLC(若使用Simatic NET的仿真功能可以不需要这些硬件，后面会介绍到)

1、组态一个S7站，配置Profibus DP网络，其DP地址设为3，并下载到PLC,然后把网线由MPI口转到DP口。S7站的配置这里就不介绍了。

Q4: vb怎么读取或修改opc变量值?

首先申明OPC对象vb.net设置opc：

Option Base 1

Dim WithEvents ServerObj As OPCServer 'OPC Server对象vb.net设置opc，连接OPC服务器

Dim GroupsObj As OPCGroups 'OPC Groups对象，添加OPC组

Dim WithEvents GroupObj As OPCGroup 'OPC Group对象

Dim ItemsObj As OPCItems 'OPC Item集合

Dim ServerHandles() As Long '服务器端OPC Itemvb.net设置opc的句柄

Dim ClientHandles() as Long '客户端OPC Item的句柄

Dim ItemId(2) As String

Dim Errors() As Long

接下来，生成各个对象vb.net设置opc：

If ServerObj Is Nothing Then Set ServerObj = New OPCServer

'连接OPC服务器

If ServerObj.ServerState = OPCDisconnected Then

ServerObj.Connect ("OPC.SimaticNET") '假设OPC服务器运行在本机

End If

If GroupsObj Is Nothing Then Set GroupsObj = ServerObj.OPCGroups

If GroupObj Is Nothing Then Set GroupObj = GroupsObj.Add

If ItemsObj Is Nothing Then Set ItemsObj = GroupObj.OPCItems

GroupObj.IsActive = True '设置组为活动状态

'假设有两个数据源，一个是8位开关量输入，一个是8位开关量输出

ItemId(1) = "S7:[S7 connection_1]IB0"

ItemId(2) = "S7:[S7 connection_1]QB0"

ClientHandles(1) = 1

ClientHandles(2) = 2

'添加组项目，ServerHandles数组的值为各个OPC Item的服务器句柄,

' ClientHandles数组的值为各个OPC Item的客户端句柄，由应用程序设定

Call ItemsObj.AddItems(2, ItemId, ClientHandles, ServerHandles, Errors)

关于vb.net设置opc和vbnet console的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。