获取变量值的程序代码很简单,如下: Sub jiankong() Dim station, mcp As Object Dim value As Variant
'--------------------------------------------创建到WinCC的连接。 Set mcp = CreateObject("WinCC-Runtime-Project") '--------------------------------------------- value = mcp.GetValue(Var) End Sub