我打算做一个小控件，函数做接口，不知什么原因老报错，请高手指点，谢谢~

Question

我在VC中创建DLL文件，其中的一个外部接口函数如下：
BSTR CAxCordExchange::GetMifPathName() 
{
CString strResult;
CFileDialog dlg(TRUE,_T("MID"),_T("*.MID"),OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,_T("*.MID"));
if(dlg.DoModal()==IDOK)
strResult=dlg.GetPathName();
return strResult.AllocSysString();
}
之后在VC的Release方式下编译它~生成DLL文件
我打算在VB中引用这个DLL文件，工程中添加一个按钮，对其消息处理函数如下：Private Sub Command1_Click()
  Dim a As CoordInsert.AxCordExchange
  Dim str As String
  str = a.GetMifPathName
  MsgBox (str)
End Sub
会出错，为什么呢？
请高手指点，谢谢~

Answer 1

传递字符串的时候需要使用指针，在VB调用的时候也 Dim str As String*n来做即可

Answer 2

问题在于没有分配内存空间，应当用SET分配空间，这样就可以了，呵呵~
请斑竹帮我收回分数，谢谢~