| 關(guān)鍵詞:VB應用程序,DDE通訊,數(shù)據(jù)交換 DDE(Dynamic Data Exchange)技術(shù)是實現(xiàn)Windows下的應用程序之間的數(shù)據(jù)交換,通訊時,其中一應用程序作為客戶端(Client),另一應用程序作為服務端(Server),或兩者均可。 一、VB應用程序訪問Realinfo(VB應用程序為客戶端,Realinfo作為服務端)的編程步驟: 1.新建工程項目,將窗體命名為DDEClient:    在窗體中繪制四個標簽,分別為Label1、Label2、Label3、Label4 在窗體中繪制四個文本,分別為Text1、Text2、Text3、Text 4 2.標簽不需要做任何設(shè)置,文本框的設(shè)置如下(例Text1):  
 Realinfo的應用程序名為DB,話題名為DB,數(shù)據(jù)連接項為數(shù)據(jù)庫變量名。 LinkItem:a1.PV(數(shù)據(jù)庫變量名) LinkMode:0,1,2,3 LinkTopic:DB|DB (注:LinkMode初始為0,當Realinfo已啟動可設(shè)置為1) Text2、Text3、Text4的LinkItem的分別為a2.PV、a3.PV、a4.PV,其它設(shè)置和Text1相同。 3.在Form_Load()中編寫如下腳本: 
        將各個文本設(shè)置為自動連接方式,運行時應先啟動Realinfo,否則報錯。       4.Realinfo中的組態(tài):在DB數(shù)據(jù)庫組態(tài)中建立四個數(shù)據(jù)庫點,分別為a1、a2、a3和a4(與VB中文本LinkItem的屬性值一致) 5.先運行Realinfo,再啟動VB程序,效果圖如下:    
                                            Realinfo運行系統(tǒng)                                                VB程序 二、Realinfo訪問VB應用程序訪 (VB應用程序為服務端,Realinfo作為客戶端)的編程步驟: 
	新建工程項目,將窗體更名為DDEServer:  
   在窗體中繪制四個標簽,分別為Label1、Label2、Label3、Label4 在窗體中繪制四個文本,分別為var1、var2、var3、var 4(四個屬性值初始為1.00000) 
	文本和標簽均不需要做任何設(shè)置,窗體DDEServer的設(shè)置如下:  
 LinkMode:1-Source(表示程序作為服務端) LinkTopic:窗體的名字(即DDEServer) 
	生成VB應用程序(注意應用程序名字不能超過8個字符)Realinfo中的組態(tài): 第一步 建立DDE設(shè)備   定義設(shè)備名稱:DDE  
 第二步 輸入服務和主題名稱   服務器名稱:輸入生成的應用程序名 主題名稱:VB應用程序窗體名稱  
   第三步 進入數(shù)據(jù)庫組態(tài)   建立四個數(shù)據(jù)庫點:a1、a2、a3和a4  
 第四步 建立數(shù)據(jù)連接   DDE連接項:輸入VB窗體中文本框的名字 四個點分別對應var1、var2、var3和var4  
 
	先啟動VB程序,再啟動Realinfo運行效果如下:    
                                                   VB應用程序                                    Realinfo運行系統(tǒng)   
 |