在VB中双击文件自动运行我的程序

我编了一个软件，在软件中选择文图片地址就可以在窗体中打开。现在我想如何实现当我双击图片文件时可以自动打开我的软件并在窗体中打开？也就是如何获取这个图片的地址？
我想问下：怎么样才能把那个图片的地址给传回来呢？如果只能传回来图片名，我该怎样告诉程序那个图片在哪呢？
另外，再提一个小小的要求：因为我们学校的机子我们没有管理员密码，只能用来宾帐户，应该不能修改注册表吧！那怎么办呢？

还有，我按照你说的添加了注册表，为什么还是没有关联到我的软件呢？

'添加文件关联
Public Function mak_fa(fext As String, extid As String, extanm As String) As Boolean
On Error GoTo erh

mak_fa = True

Dim o As Object
Set o = CreateObject("wscript.shell")
o.regwrite "HKCR\." + fext + "\", extid, "REG_SZ"
o.regwrite "HKCR\." + fext + "\Shell\Open\Command\", extanm + " %1", "REG_SZ"
Exit Function

erh:
mak_fa = False
End Function

Private Sub Command1_Click()
MsgBox IIf(mak_fa("cccc", "bbbb文件", App.Path & "\" & App.EXEName & ".exe"), "关联成功", "失败")
End Sub

Private Sub Form_Load()
If Len(Command) = 0 Then
Label1.Caption = "直接打开程序"
Else
Label1.Caption = "你打的文件路径是：" & Command