Значение типа '1-мерный массив байтов' не может быть преобразовано в 'system.security.cryptography. icryptotransform'

---

Извините, у меня есть программа, и я получил какую-то ошибку. есть ошибка в "экзабайт" из моей программы, пожалуйста, помогите мне для учебы. спасибо, извините за мой плохой английский.

Что я уже пробовал:

Private Sub enkripfile(ByVal inputfile As String, ByVal outputfile As String, ByVal direction As aksikripto)
        'Dim fsinput As New FileStream(inputfile, FileMode.Open, FileAccess.Read)
        Dim fbytes As Byte()
        Dim ebytes As Byte()
        Dim fsoutput As New FileStream(outputfile, FileMode.Create, FileAccess.Write)
        Dim cs As New CryptoStream(fsoutput, ebytes, CryptoStreamMode.Write)
        Select Case direction
            Case aksikripto.enkrip
                bf.Key = System.Text.Encoding.UTF8.GetBytes("akrie")
                fbytes = File.ReadAllBytes(inputfile)
                ebytes = bf.EncodeBytes(fbytes)
                'Dim bfencrypt As ICryptoTransform = bf.EncodeBytes()
                'mycryptostream = New CryptoStream(fsoutput, bf.EncodeBytes, CryptoStreamMode.Write)

        End Select
        

    End Sub

---