Usar código personalizado do modelo

No exemplo a seguir, você cria uma função para substituir a palavra "Bike" por "Bicicleta".

1. Em Propriedades do Relatório, selecione a página Código.

2. Insira uma função do Visual Basic válida. Por exemplo:

   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. Adicione um campo de texto ao seu modelo e edite o valor. O código definido nas Propriedades do Relatório será listado no Editor de Expressão em Código Personalizado. Utilize a seguinte expressão:

=Code. ChangeWord("Eu gosto de bicicleta")

Na visualização do relatório, o texto será mostrado como "Eu gosto de bicicleta".