求 vb 字符串散列函数

Question

我不太懂这个，不过这样可以么？Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Dim s1 As String = "it's a go!"
    Dim s2 As String = "it's a go!"
    Dim s3 As String = "it's not a go!"
    Dim i As Int32 = s1.GetHashCode
    Dim j As Int32 = s2.GetHashCode
    Dim k As Int32 = s3.GetHashCode
    MsgBox(i.ToString & vbCrLf & j.ToString & vbCrLf & k.ToString)
End Sub

Answer 1

MD5算法
参考
http://www.pediy.com/bbshtml/BBS5/pediy50340.htm

Answer 2

Dim data(DATA_SIZE) As Byte' This is one implementation of the abstract class MD5.
Dim md5 As New MD5CryptoServiceProvider()Dim result As Byte() = md5.ComputeHash(data)