请教几个VB基础问题

guoya

我做好了ACCESS数据库，现在想做一个安装程序和启动工作组关联启动程序
1、安装程序中进行系统检测,如果没有ACCESS决自动安装ACCESS Runtime,我是通过api函数RegOpenKeyEx检测access注册项进行的，问题是access runtime是通过一个压缩包安装的，不能用shell函数，请问在vb中用什么方法打开一个普通文件（如vba中的followhyperlink）?
2、在关联工作组启动设计时发现一个问题，accesspath(也是通过api函数取得的access安装路径)无法通过&与任何其他字符进行联接,
Dim AccessPath As String
Dim MyPath As String
Dim M, Q
Dim RetVal
MyPath App.Path
If Right(MyPath, 1) <> "\" Then MyPath = MyPath & "\"
AccessPath = GetAccessSysPath()
'If AccessPath = "" Then Unload Me
M = "/WRKGRP " & Chr(34) & MyPath & "Secured.mdw"
Q = MyPath & "archives xp.mdb"
RetVal = Shell(chr(34)&AccessPath & "MSACCESS.EXE",........ vbMaximizedFocus)