两个程序间的DDE通信问题，在线等！！！

Question

有两个程序，一个是Server，一个是Client
Server上有一文本框，LinkMode=1   LinkTopic=ServerForm代码如下：
Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
  Static lngCount As Long
  Dim Info As String  Info = txtInfo.Text  Select Case CmdStr
    Case "Max"
     Me.WindowState = 2
  End Select
  txtInfo.Text = "最大化窗口"  Cancel = False
End SubClent上有一图片框，name="picDDE"
LinkMode=0   LinkTopic=""代码如下：
Private Sub LinkAndSendMessage(ByVal Msg As String)
  Dim t As Long
  picDDE.LinkMode = 0
  picDDE.LinkTopic = "Server|ServerForm"
  picDDE.LinkMode = 2
  picDDE.LinkExecute Msg
  t = picDDE.LinkTimeout
  picDDE.LinkTimeout = 1
  picDDE.LinkMode = 0
  picDDE.LinkTimeout = t
End Sub
Private Sub Form_Load()
  LinkAndSendMessage "Max"
End Sub
理想状态：
先运行SERVER，然后运行CLIENT，此时CLIENT主动向SERVER发命令，SERVER接到命令后就最大化窗口，并在文本框上输出文字。但这个程序运行不成功，为什么？？？？

Answer 1

设置Server　form1  LinkMode=1  LinkTopic=ServerForm   
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) http://feiyun0112.cnblogs.com/

Answer 2

唉，还想求高手，还不如求自己。很简单，SERVER编译时，把窗口标题改一下就行了。