Public Function encrypt(ByVal message As Byte(), ByVal password As String) As Byte()
Dim passarr As Byte() = System.Text.Encoding.Default.GetBytes(password)
Randomize()
Dim rand As Integer = Int((255 - 0 + 1) * Rnd()) + 1
Dim outarr(message.Length) As Byte
Dim u As Integer
For i As Integer = 0 To message.Length - 1
outarr(i) += (message(i) Xor passarr(u)) Xor rand
If u = password.Length - 1 Then u = 0 Else u = u + 1
Next
outarr(message.Length) = 112 Xor rand
Return outarr
End Function
私が聞きたい質問:
getbytes(password)
すでに文字列として宣言されています...なぜバイトを取得したいのですか!!message
ここの役割は何ですか?何を
rand
しoutarr
ているのmessage
?outarr(message.Length) = 112 Xor rand
-これは理解できません