『壹』 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