组态王与VB应用程序的实时数据交换

】　　组态王支持通过DDE方式与其它应用程序进行数据交换，通过DDE方式用户自编的应用程序可以无缝的与组态王进行数据交换，扩充组态王的功能，为用户提供更为灵活的应用空间。
　　
　　VB应用程序从组态王中获得数据
　　
　　1．创建VB应用程序。(参见图-1)创建标准EXE程序(工程名为VBDDE)，窗体名为”VBDome”（DDE服务的话题名）。
　　
　　

　　图1
　　2．在VB应用程序中建立与组态王变量的DDE连接(参见图-2)，在VB窗体里加一个”Label”控件(将其命名为VB2，)，在其属性里设置与DDE相关的项目：
　　设置LinkTopic的值为”view|tagname”(组态王默认的服务名和应用名，不可更改)；
　　设置LinkItem的值为”PLC.INCREA100”(组态王变量得寄存器地址，格式为” 连接设备名.寄存器名”)；
　　设置LinkMode的值为”1”(如组态王运行系统未运行，显示错误，参见第3步)；
　　设置LinkTimeout的值为”50”(为默认值即可)。
　　

　　图2
　　
　　3． VB应用程序启动时设置连接模式为自动(VB2.LinkMode=1)。参见图-3。单击窗体(Foem)，弹出代码编辑框，选择Form的Load属性。键入”VB2.LinkMode=1”。编译本工程。
　　
　　

　　图3
　　4．运行组态王的运行系统(加载本演示工程)，运行生成的VB运行程序。Vb应用程序即可通过DDE方式得到组态王变量”B”的实时数据，并显示其值在当前的窗口。
　　组态王从VB应用程序中获得数据
　　1．利用上述创建的VB应用程序，在菜单条选择”VBDDE属性”,弹出如下窗口(参见图-4)。选择生成属性框，在应用程序的标题中键入”VBDDE”(DDE服务程序名)。
　　
　　

　　图4
　　
　　2．在窗体里添加TextBox控件(命名为VB1，将作为DDE服务的项目名)，参见图-5。选择代码编辑窗口，选择Form的MouseMove事件，键入如下语句” VB1.Text = Int(VB2.Caption)+1”。
　　
　　

　　图5
　　3．设置VBDDE程序为DDE发布端。设置窗体属性的DDE属性，参见图-6。
　　设置LinkMode的值为”1”(表示应用程序为DDE的发布端)；
　　设置LinkTopic的值为”VBDome”（(DDE话题名)。
　　设置完成并确认无误后即可编译生成应用程序文件。
　　

　　图6
　　4．在组态王建立IO变量，并以前面所创建的VB用程序作为数据源。添加DDE设备的方法同前(定义的DDE设备名为VBDDE)，DDE的应用程序名和话题名为前面设置的名称，即应用程序名为”VBDDE”，话题名为”VBDome”。
　　5．在组态王建立变量”VB2”(参见图-7)，连接设备为”VBDDE”，项目名为”VB1”(即为VB程序TexTBox控件的名称)。