Removendo espaços em branco no final de uma string

'Este exemplo mostra como remover os espaços
'no final de uma string

Module Module1
  Sub Main()
    Dim frase As String = "Alguns espaços no final    "

    'vamos retirar os espaços no final
    frase = frase.TrimEnd() & "."

    'exibe o resultado
    Console.WriteLine(frase)

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module