Damn Visual Basic! Damn it to hell!

[Kon-Tiki]

Why isn't it working properly?
If you toss a disc in at the second row, it'll stay in the loop after the if-statement, after all that has to be done, is done, except when you toss the disc in the first column. Then it works fine.

I tried putting an else-statement there, to turn the loop off if the else-statement was called, and it works fine then, but the four on a row diagonally isn't detected then.

[Kon-Tiki]

Never y'all mind. Redid the entire thing with new algorythms and the code's small, slender and sweet

Compiled version
Compiled version with the code-stuff included