急急急！怎么获取函数调用的返回值？

[lovcal]

Sub CellView()
CellLogin()
CellWeb1.OpenFile "http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>",""
End Sub

我是使用了Cell插件
CellWeb1.OpenFile 函数有好几个返回值，请问我怎么获取这返回值，用MsgBox显示出来？
Sub CellView()
Dim a
CellLogin()
set a=（CellWeb1.OpenFile "http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>","")
MsgBox a
End Sub
这样不对……

[若白师妹]

sub没有返回值
function CellView()
Dim a
CellLogin()
set a=（CellWeb1.OpenFile "http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>","")
CellView=a
End Sub
msgbox (CellView())

[若白师妹]

sub没有返回值
function CellView()
Dim a
CellLogin()
set a=（CellWeb1.OpenFile "http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>","")
CellView=a
End function
msgbox (CellView())

[lovcal]

我要获取
CellWeb1.OpenFile "http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>",""
的返回值，判断打开文件的状况

[Triumph]

Dim a
a = CellWeb1.OpenFile("http://<%=Session("LocalServer")%>/Report/Cell/<%=sReportName%>","")

VB里函数和过程的使用的区别是：函数的参数必须用括号括起来，过程不能使用括号。如果使用函数时没有加括号，那么解释器就把它当成一个过程使用，相反，过程加括号时解释时就会把它当成一个函数使用，这样当然会报错，因为过程没有返回值。

[webphoenix]

那你要看CellWeb1.OpenFile 返回的是什么类型的值，是一个对象，数组还是其它，如果是个对象，用msgbox，肯定报错，msgbox(typename(a))一下看看是什么