Ssrs 2008 自定义代码函数能否返回两个值？

我的报告中有以下代码：

Dim suma As Decimal=New Decimal（）
公共函数SumLookup（ByVal项作为Object（））作为十进制
如果项目不算什么，那么
一无所获
如果结束
将ct调整为整数=新整数（）
suma=0
ct=0
将每个项目作为项目中的对象
suma+=Convert.ToDecimal（项目）
ct+=1
下一个
如果（ct=0），则返回0，否则返回suma
端函数
公共函数GetMyVal（）作为十进制数
GetMyVal=suma
端函数

上述函数返回suma，我通过以下方式调用该函数：

code.SumLookup（LookupSet（字段！索赔货币.值，字段！索赔货币.值，字段！支付的总额\u损失\uuuuuuuuuuuu LAE.值，“数据集”））

我想在我的报告中同时使用变量

suma

和

ct

---

如何调整函数以使其返回两个变量，然后如何从报告中调用它们？

如果将ct声明为公共变量，则可以在代码中以code.variable的形式访问它

Public ct As Integer

tb1=code.SumLookup(LookupSet(Fields!Claim_Currency.Value,Fields!Claim_Currency.Value,Fields!Total_Paid_Loss___LAE.Value, "dataSet"))

tb2=code.ct