单击“代码”。在“自定义代码”中键入代码。报表运行时,代码中的错误会引发警告。下面的示例创建一个名为 ChangeWord 的自定义函数,该函数可使用词语“Bicycle”替换“Bike”。 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 下面的示例演示如何在表达式中向此函数传递名为 Category 的数据集字段。