反向XOR加密不起作用？

Question

So I have the following function To XOR a string and it works but when I pass the encrypted string back into it the output is not decrypetd. MY understanding is to De XOR something is to simply XOR it again but it seems to fail, Any ideals on why this is ? Also Im storing the xor as hex

Public Shared Function StringToHash(ByVal str As String) As Integer
    Dim hash As Integer = (AscW(Char.ToLower(str(0))) Xor &H4B9ACE2F) * &H1000193
    For i As Integer = 1 To str.Length - 1
        hash = (AscW(Char.ToLower(str(i))) Xor hash) * &H1000193
    Next
    hash = hash * &H1000193
    Return hash
End Function

Answer 1

As already indicated, this is about hashing, not encryption - two related but separate notions.

---

Although secure hashes are one-way, the above function is certainly not a secure hash. So you may be able to reverse it for very small input sizes.

Besides that, although hashes are usually not reversible, it may be possible to brute force the hash value.

This would only work for if the input alphabet is limited (a few characters, or a limited set of words etc.) and it may return too many inputs if the hash output size is small (which in this case it certainly is). But otherwise you just toss in some input and test if it results in the same hash value.