求RC4算法的原理,最好用通俗的语言讲解,能打下比方更好了(本人能看懂一点VB跟C)

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/01 07:45:53

求RC4算法的原理,最好用通俗的语言讲解,能打下比方更好了(本人能看懂一点VB跟C)
求RC4算法的原理,最好用通俗的语言讲解,能打下比方更好了(本人能看懂一点VB跟C)

求RC4算法的原理,最好用通俗的语言讲解,能打下比方更好了(本人能看懂一点VB跟C)
RC4经典加密算法VB版本代码
VB版rc4算法
Public Sub main()
Dim key As String
For i = 1 To 16
Randomize
key = key & Chr(Rnd * 255)
Next i
MsgBox RC4(RC4("Welcome To Plindge Studio!", key), key)
End Sub
Public Function RC4(inp As String, key As String) As String
Dim S(0 To 255) As Byte, K(0 To 255) As Byte, i As Long
Dim j As Long, temp As Byte, Y As Byte, t As Long, x As Long
Dim Outp As String
For i = 0 To 255
S(i) = i
Next
j = 1
For i = 0 To 255
If j > Len(key) Then j = 1
K(i) = Asc(Mid(key, j, 1))
j = j + 1
Next i
j = 0
For i = 0 To 255
j = (j + S(i) + K(i)) Mod 256
temp = S(i)
S(i) = S(j)
S(j) = temp
Next i
i = 0
j = 0
For x = 1 To Len(inp)
i = (i + 1) Mod 256
j = (j + S(i)) Mod 256
temp = S(i)
S(i) = S(j)
S(j) = temp
t = (S(i) + (S(j) Mod 256)) Mod 256
Y = S(t)
Outp = Outp & Chr(Asc(Mid(inp, x, 1)) Xor Y)
Next
RC4 = Outp
End Function

求RC4算法的原理,最好用通俗的语言讲解,能打下比方更好了(本人能看懂一点VB跟C) 用通俗的语言讲解一下定理7. 怎么用通俗的语言来解释半导体制冷原理 用通俗的语言, 最好能讲解的通俗一点,加例题讲解的 什么是基金,希望谁可以用简单通俗的语言讲解一下什么是基金,希望谁可以简单通俗的语言讲解一下,谢谢 谁能用比较通俗的语言讲解一下回溯法? F35的垂直降落原理是什么我要通俗的讲解,最好用比拟的方法给我形容出来,关键技术在哪一块? F35的垂直降落原理是什么我要通俗的讲解,最好用比拟的方法给我形容出来,关键技术在哪一块? BP神经网络算法求讲解谁可以用通俗易懂的语言给我描述一下BP神经网络算法的执行步骤,谢谢! go though和go across的区别,最好有例句,讲解的清楚,简洁,语言通俗,讲解的细致一点,我知道我不聪明。 勒夏特列原理应该如何用通俗的语言去解释? 最好用通俗语言述说 制肥皂的过程.不要网上摘来,最好用自己的语言讲 ,通俗一点,明白一点,原理希望讲清楚,小弟在这儿拜托了. 磁屏蔽的原理?我想知道为什么中间那一块没有磁场?最好用通俗一点的语言,别那么高深. 请通俗地解释一下广义相对论等效原理,用高中生能够听明白的语言~ 通俗的语言讲讲 谁能把Oracle的体系结构用通俗的语言讲解一下 我要自己理解的.用通俗的话说出来.