使用模板中的自定义代码

例如：字符串替换函数

在以下示例中，创建了一个函数，以便将 "Bike" 替换为 "Bicycle"。

1. 在报告属性中，选择代码页。

2. 输入有效的 Visual Basic 函数。例如：

   Public Function ChangeWord(ByVal s As String) As String

   Dim strBuilder As New System.Text.StringBuilder(s)

   If s.Contains("Bike") Then

   strBuilder.Replace("Bike", "Bicycle")

   Return strBuilder.ToString()

   Else : Return s

   End If

   End Function

3. 为模板添加文本字段，然后对值进行编辑。在报告属性中定义的代码将在表达式编辑器的自定义代码中列出。使用下列表达式：

   =Code. ChangeWord("I like Bike")

    

   

 

在报告预览中，文本将显示为 "I like Bicycle"。

例如：在变量中存储字符串值

计算变量只能存储数值。下面的示例展示了如何在变量中存储字符串值。

1. 在报告属性中，选择代码页。

2. 定义变量，并创建用于设置和获取值的函数。

   Public Function ChangeWord(ByVal s As String) As String

   Dim MyText As String = ""

    

   Function SetMyText(text as String)

   MyText = text

   Return MyText

   End Function

    

   Function GetMyText() As String

   Return MyText

   End Function

3. 要设置变量，请在字段或列中使用以下表达式代替原始值。

   例如，用 =code.SetMyText(Signal_ID) 代替 =Signal_ID

4. 要稍后在模板中使用该变量，请使用以下表达式：

   =code.GetMyText()