双击文件调用程序
怎样做到双击文件，调用关联程序，当双击第二个文件时，程序会显示第二个文件内容，第一个文件内容退出。
如：Picasa看图一样，在资源管理器中，双击第一个图片显示后，再双击第二个图片，只显示第二个图片，但程序只有一个运行。
[解决办法]
从Sub Main启动。
先检查是否有实例运行，如果没有，自己继续运行；
如果已有，把参数传递给前一个实例，让它来打开，自己退出。
[解决办法]
在Main中写
If App.PreInstance = True
h = FindWindow(程序标题, VbNullString)
PostMessage(h, WM_EXIT, 0, 0)
End If
fileName = Command
'加载文件
以上代码请自己完善API声明等。
[解决办法]
