关于读取快捷方式?

Dim cShellLink As ShellLinkA                        ' An explorer IShellLink instance
    Dim cPersistFile As IPersistFile                    ' An explorer IPersistFile instance
'---------------------------------------------------------------
    If (Len(LnkFile) = 0) Then Exit Function                ' Validate min. input requirements.
    
    Set cShellLink = New ShellLinkA                     ' Create new IShellLink interface
    Set cPersistFile = cShellLink                       ' Implement cShellLink's IPersistFile interface
    
    ' Load Shortcut file...(must do this UNICODE hack!)
    On Error GoTo ErrHandler
    cPersistFile.Load StrConv(我传过来的快捷方式文件名, vbUnicode), STGM_DIRECT 
    '上面这句就是出错的地方    With cShellLink
        ExeFile = Space$(MAX_PATH)
        .GetPath ExeFile, MAX_PATH, fd, SLGP_UNCPRIORITY
................
上面的代码哈,就是只要读倒带有"西"字符时就会出现"自动化错误",因为我在读取大话西游戏的快捷方式时出错的,
然后我看了delphi和VC,他们在执行cPersistFile.Load 之前先用下面的API转换过,但我不知道下面的API是管什么用的
Public Declare Function MultiByteToWideChar Lib "kernel32" (ByVal CodePage As Long, ByVal dwFlags As Long, ByVal lpMultiByteStr As String, ByVal cchMultiByte As Long, ByVal lpWideCharStr As String, ByVal cchWideChar As Long) As Long