双击文件调用程序
怎样做到双击文件，调用关联程序，当双击第二个文件时，程序会显示第二个文件内容，第一个文件内容退出。
如：Picasa看图一样，在资源管理器中，双击第一个图片显示后，再双击第二个图片，只显示第二个图片，但程序只有一个运行。
[解决办法]
从Sub Main启动。
先检查是否有实例运行，如果没有，自己继续运行；
如果已有，把参数传递给前一个实例，让它来打开，自己退出。

[解决办法]
在Main中写
If App.PreInstance = True
h = FindWindow(程序标题, VbNullString)
PostMessage(h, WM_EXIT, 0, 0)
End If
fileName = Command
'加载文件

以上代码请自己完善API声明等。
[解决办法]

引用:

WM_EXIT 应是退出的意思吧，值是多少？与END 有区别吗？

在开始菜单-VB-工具中有一个API文本浏览器，自己查询下。
[解决办法]
先注册一个自己的消息API:RegisterWindowMessage,然后用BroadcastSystemMessage发送一样广播消息出去。