怎样在两个VB程序之间传递信息？

可以用动态数据交换(Dynamic Data Exchange,DDE)实现进程之间的通信。

发送端：

添加Command1，Text1控件，Text1的内容用于发送。

代码如下：

Private Sub Command1_Click()
Dim t As Long
Text1.LinkMode = 0
Text1.LinkTopic = "Child|FrmChild" '注意此处一定与接收的程序名称和连接的标题相同否则连接不成功。
Text1.LinkMode = 2
Text1.LinkExecute Text1.Text
t = Text1.LinkTimeout
Text1.LinkTimeout = 1
Text1.LinkMode = 0
Text1.LinkTimeout = t
End Sub

接收端：

添加Text1控件，Text1的内容用于接收。设置工程名称为Child（与发送的程序名对应），设置窗体的LinkMode属性为1，LinkTopic为FrmChild(对应上面发送的标题)。

Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
Text1 = CmdStr
Cancel = 0
End Sub

编译后，先运行接收端，然后运行发送端，输入内容，发送即可成功。

VB中，如何在两个窗口之间传递数据？ vb 怎么样在两个sub之间传递变量 怎样使不同编程语言编译的程序之间能互相传递信息？ 两个if语句之间怎样传递值 怎么样能在程序间传递信息？ 在困境中怎样传递信息？ 在古代是怎样传递信息 VB如何在2个程序间传递数据 C#中在两个窗体之间如何传递数值 音箱怎样传递信息