‘壹’ vb程序，关于DDE技术
你的意思是双击一个txt文件吧
可以使用 DDE ，DDE可以在两个程序间发送信息
具体如下：
'把你主窗体的“LinkTopic”属性改为“FormDDE”，把“LinkMode”
'属性改为“1 - Source”，添加一个PictureBox控件作为DDE执行控件，命名为picDDE
'picDDE.LinkTopic = "DDE1|FormDDE" 这句代码中的DDE1 是你的工程名 改成你自己的，或把你的改成DDE1
'最后在窗体代码区输入以下代码:
Private Sub Form_LinkExecute(CmdStr As String, Cancel As Integer)
'CmdStr是接收到信息 在这里就是你打开的文件了
'这里添加打开文件的代码 如调用已有open file方法等等
Cancel = False
End Sub
Private Sub LinkAndSendMessage(ByVal Msg As String)
Dim t As Long
picDDE.LinkMode = 0 '--
picDDE.LinkTopic = "DDE1|FormDDE" ' |______连接DDE程序并发送数据/参数
picDDE.LinkMode = 2 ' | “|”为管道符，是“退格键”旁边的竖线，
picDDE.LinkExecute Msg '-- 不是字母或数字！
t = picDDE.LinkTimeout '--
picDDE.LinkTimeout = 1 ' |______终止DDE通道。当然，也可以用别的方法
picDDE.LinkMode = 0 ' | 这里用的是超时强制终止的方法
picDDE.LinkTimeout = t '--
End Sub
Private Sub Form_Load()
If App.PrevInstance Then ' 程序是否已经运行
Me.LinkTopic = "" ' 这两行用于清除新运行的程序的DDE服务器属性，
Me.LinkMode = 0 ' 否则在连接DDE程序时会出乱子的
If Command <> "" Then
LinkAndSendMessage Command '连接DDE接受程序并传送 命令行参数
End If
End ' 结束新程序的运行
End If
End Sub