FNV Hash
FNV is a hash function algorithm.
Public Shared Function FNVHash(str As String) As UInteger
Const fnv_prime As UInteger = &H811C9DC5UI
Dim hash As ULong = 0
Dim i As UInteger = 0
For i = 0 To str.Length - 1
hash = (hash * fnv_prime) And UInteger.MaxValue
hash = hash Xor CByte(AscW(str(CInt(i))))
Next
Return hash
End Function
Example
Dim data = "jdfgsdhfsdfsd 6445dsfsd7fg/*/+bfjsdgf%$^"
Dim value = FNVHash(data)
Output
2267144173