System.Security.Cryptography.CryptographicException: '错误数据 ' 三重 DES 加密 vb.net ms access

如何解决System.Security.Cryptography.CryptographicException: '错误数据 ' 三重 DES 加密 vb.net ms access

加解密

Imports System.Security.Cryptography
Imports System.Text
Imports System.IO



Public Class EncDeccls

    Private tripleDES As New TripleDESCryptoServiceProvider

    'Public Sub New(_KEY As String)
    '    KeyStr = _KEY
    'End Sub

    'Private keyvalue As String
    'Public Property Keystr() As String
    '    Get
    '        Return keyvalue
    '    End Get
    '    Set(value As String)
    '        keyvalue = value
    '    End Set
    'End Property

    Function Encryption(ByVal datafile As String) As String

        Dim input As Byte() = System.Text.Encoding.Unicode.GetBytes(datafile)

        Dim ms As New System.IO.MemoryStream
        Dim encstream As New CryptoStream(ms,tripleDES.CreateEncryptor(),System.Security.Cryptography.CryptoStreamMode.Write)

        encstream.Write(input,input.Length)

        encstream.FlushFinalBlock()

        Return Convert.ToBase64String(ms.ToArray)

    End Function

    Function Decryption(ByVal encryptedfile As String) As String

        Dim output() As Byte = System.Text.Encoding.Unicode.GetBytes(encryptedfile)

        Dim ms As New System.IO.MemoryStream
        Dim decstream As New CryptoStream(ms,tripleDES.CreateDecryptor(),System.Security.Cryptography.CryptoStreamMode.Write)

        decstream.Write(output,output.Length)

        decstream.FlushFinalBlock()

        Return System.Text.Encoding.Unicode.GetString(ms.ToArray)
    End Function
End Class

从数据库中检索数据并解密，然后在datagridview(DGVSV)上显示的代码

Dim cmd1 As New OleDbCommand("SELECT * FROM pwdmgr WHERE username = @uname",conn)
        cmd1.Parameters.Add("@uname",OleDbType.VarChar).Value = x
        conn.open()
        dr = cmd1.ExecuteReader
        dr.Read()
        DGVSV.Rows.Add(dr.Item("id").ToString,EncryptDecryptFiles.Decryption(dr.Item("email").ToString),EncryptDecryptFiles.Decryption(dr.Item("pwd").ToString))
        
        conn.Close()

有几行数据需要检索并将其显示到数据网格视图（DGVSV）中。每次当我在上面运行此函数时，它都会显示此错误 System.Security.Cryptography.CryptographicException: 'Bad Data. '

有人可以帮助我吗？