在报告 rdlc 中用自定义代码编写多个函数

Question

我正尝试在 rdlc 自定义代码中编写 2 个函数定义，如下所示

 Public Function GetValue(ByVal total as Integer) As Integer
   total = total - (total * 0.04)   
   Return total 
 End Function 

 Public Function GetCalValue(By caltotal as Integer) As Integer
   caltotal = (caltotal - (caltotal * 0.04)) + (caltotal * 0.004)
   Return caltotal
 End Function

但我收到以下错误：

   Error    1   There is an error on line 5 of custom code: [BC30213] Comma or ')' expected.            
   C:\Users\user\Documents\Visual Studio 2012\Projects\WindowsApplication3\WindowsApplication3\Report5.rdlc WindowsApplication3

有人可以告诉我我犯了什么错误吗？

Answer 1

Public Function GetCalValue(By caltotal as Integer) As Integer

"By" 应该是 "ByVal"

Public Function GetCalValue(ByVal caltotal as Integer) As Integer

在报告 rdlc 中用自定义代码编写多个函数

Writing multiple functions in custom code in report rdlc

vb.net

rdlc