向后台工作者传递值(Passing Values To and From Background Worker)

 我是一个自学成才的新手试验Rijndael加密算法 ，我之前已经很好地工作了，但是因为我试图让后台工作者运行加密来为用户释放表单我遇到了很多问题。 
 
 首先，我尝试将我在前面的代码中使用的byval放入后台工作器，但是我得到了一个错误，它不兼容 - 特别是ByVal Direction As CryptoAction 。 
 
 所以要清楚，我正在尝试这样的事情： 
 
Private Sub bw_DoWork(ByVal sender As Object,ByVal strInputFile As String,
                                     ByVal strOutputFile As String,
                                     ByVal bytKey() As Byte,
                                     ByVal bytIV() As Byte,
                                     ByVal Direction As CryptoAction, ByVal e As DoWorkEventArgs)


    Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)

    For i = 1 To 1
        If bw.CancellationPending = True Then
            e.Cancel = True
            Exit For
        Else

            'Encryption code goes here. 
end sub 
 
 但正如我所说，我被告知方向与CrytoAction不兼容。 在完整的completness中，那个sub是： 
 
Private Enum CryptoAction
        'Define the enumeration for CryptoAction.
        ActionEncrypt = 1
        ActionDecrypt = 2
    End Enum
 
 所以为了让代码工作，我完成了这个，我认为这就是为什么我的加密文件解密成一个不可读的文件，我有时会得到错误： 填充无效，无法删除 。 关闭文件流时。 
 
 所以我在我的公共类中声明了bytkey，byIV，Direction和其余部分，就像我说的那样让代码运行。 但是我可以在加密后恢复文件。 我的想法是，当我的代码引用函数时，它不是接收返回的值，而是接收一个空字符串？ 
 
 这是引用生成密钥的函数的代码，只是为了清楚我的意思。 
 
                 Select Case Direction
                        Case CryptoAction.ActionEncrypt
                            csCryptoStream = New CryptoStream(fsOutput, _
                            cspRijndael.CreateEncryptor(bytKey, bytIV), _
                            CryptoStreamMode.Write)

                    Case CryptoAction.ActionDecrypt
                        csCryptoStream = New CryptoStream(fsOutput, _
                        cspRijndael.CreateDecryptor(bytKey, bytIV), _
                        CryptoStreamMode.Write)
                End Select
 
 
 所以，我的问题是，我是正确的，代码是从声明中引用空值，还是代码仍然引用函数？ 并且，是否可以将ByVal CryptoStream添加到后台工作程序中？ 
 
 我对我的问题的大小我最真实的道歉，我到处寻找解决方案，但找不到任何相关的东西。 

I'm a self-taught novice experimenting with the Rijndael encryption algorithm, I've previously got it to work very well, but since trying to get the encryption to run on a background worker to free-up the the form for the user I've ran into numerous issues. 
 
Firstly I tried just placing the byval's I used in my previous code into the background worker, but I got an error with it not being compatible -- Specifically the ByVal Direction As CryptoAction. 
 
So to be clear, I was trying something like this:
 
Private Sub bw_DoWork(ByVal sender As Object,ByVal strInputFile As String,
                                     ByVal strOutputFile As String,
                                     ByVal bytKey() As Byte,
                                     ByVal bytIV() As Byte,
                                     ByVal Direction As CryptoAction, ByVal e As DoWorkEventArgs)


    Dim worker As BackgroundWorker = CType(sender, BackgroundWorker)

    For i = 1 To 1
        If bw.CancellationPending = True Then
            e.Cancel = True
            Exit For
        Else

            'Encryption code goes here. 
end sub 
 
But as I said, I was being told the Direction As CrytoAction was not compatible. In teh intrest of completness, that sub was:
 
Private Enum CryptoAction
        'Define the enumeration for CryptoAction.
        ActionEncrypt = 1
        ActionDecrypt = 2
    End Enum
 
So in order to get the code to work I done this, and I think this is why my encrypted files decrypt into a unreadable file and I sometimes get the error: Padding is invalid and cannot be removed. when closing the file stream. 
 
So I declared the bytkey, byIV, Direction and the rest in my Public Class, this, as I said let the code run. But I can get the file back once encrypted. My thinking is that when my code references the functions, instead of receiving the returned value, it's receiving an empty string?
 
Here's the code that references the functions which generate the keys, just to be clear at what I'm meaning.
 
                 Select Case Direction
                        Case CryptoAction.ActionEncrypt
                            csCryptoStream = New CryptoStream(fsOutput, _
                            cspRijndael.CreateEncryptor(bytKey, bytIV), _
                            CryptoStreamMode.Write)

                    Case CryptoAction.ActionDecrypt
                        csCryptoStream = New CryptoStream(fsOutput, _
                        cspRijndael.CreateDecryptor(bytKey, bytIV), _
                        CryptoStreamMode.Write)
                End Select
 
 
So, my question is, am I right that the code is referencing nulled values from the declarations, or would the code still reference the functions? And, is it possible add the ByVal CryptoStream into the background worker?
 
My sincerest appologise for the size of my question, I've looked everywhere for a solution but can't find anything relevant. 

原文：https://stackoverflow.com/questions/27555467