need help

[Jerk]

i didnt know where to ask this here or the vb section sorry if im in the wrong place but ive been trying to convert this to vb but im not having any luck if anyone can be so kind and help me read or explain it so i can understand how to maybe convert it into vb thanks

void encode(char * what, unsigned int length) {
 
        int counter, x;
 
        for (counter = 4; counter >= 0; counter--) {
 
                if (counter != 4) what[0] ^= what[length-1];
                else              what[0] ^= (char)(length);
 
                for (x = 1; x < (int)length; x++) what[x] ^= what[x-1];
        }
}
 
 
 
void decode(char * what, unsigned int length) {
 
        int counter, x;
 
        for (counter = 0; counter < 5; counter++) {
 
                for (x = length-1; x > 0; x--) what[x] ^= what[x-1];
 
                if (counter != 4) what[0] ^= what[length-1];
                else              what[0] ^= (char)length;
        }
}