Visual Basic.NET - Encriptar fichero de texto

Hola a todos, ¿alguien me puede mostrar un ejemplo de como encriptar y desencriptar un fichero de texto de forma sencilla con las clases que suministra vb.net?. He probado mil ejemplos y todos me dan alguna clase de error. Por favor, si no es mucho pedir, un ejemplo completo, con los espacios de nombres que hay que importar, etc...

Gracias mil de antemano.

Imports System.Security.Cryptography

Public Class Form1

Private Crypto As New RSACryptoServiceProvider
Private ue As New System.Text.UTF7Encoding

Private Sub btnEncriptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEncriptar.Click
Me.txtEncriptado.Text = Encriptar(txtDesencriptado.Text)
End Sub

Private Sub bntDesencriptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bntDesencriptar.Click
Me.txtDesencriptado.Text = Desencriptar(Me.txtEncriptado.Text)
End Sub

Private Function Encriptar(ByVal Texto As String) As String
Dim strTextoEncriptado As String
Dim bytTexto As Byte()
Dim bytEncry As Byte()

Try
bytTexto = ue.GetBytes(Texto)
bytEncry = Crypto.Encrypt(bytTexto, False)
strTextoEncriptado = Convert.ToBase64String(bytEncry)

Return strTextoEncriptado
Catch ex As Exception

End Try
End Function

Private Function Desencriptar(ByVal Texto As String) As String
Dim strTextoDesencriptado As String
Dim bytDesenc As Byte()

bytDesenc = Crypto.Decrypt(Convert.FromBase64String(Texto), False)
strTextoDesencriptado = ue.GetString(bytDesenc)

Return strTextoDesencriptado
Try

Catch ex As Exception

End Try
End Function
End Class

La encriptación funciona.
La desencriptación muestra un textbox vacío.