vb远程访问dde服务器,VB 利用DDE进程间通信，5行代码搞定

Client

添加Command1，Text1及一个pictureBox(命名为picDDE)

代码如下：

Option Explicit

Private Sub Command1_Click()

picDDE.LinkTopic = "app2|yuanyuan"

picDDE.LinkMode = 2

picDDE.LinkExecute Text1.Text

End Sub

Server

添加Text1，设置工程名称为app2，设置窗体的LinkMode属性为1，LinkTopic为yuanyuan

代码如下：

Option Explicit

Private Sub Form_LinkExecute(CmdStr As String,Cancel As Integer)

Text1.Text = CmdStr

Cancel = 0

End Sub

验证方法：

假设编译后client为client.exe，server端为server.exe。先双击运行server.ext，然后再打开client.exe，在client端的文本框里输入消息然后点按钮发送，这样server.exe那边就会显示出自于客户端的信息。

整个工程下载地址：

总结

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。