Hola
MicroHack no funciona porque no puedes comparas un tipo de char de esa manera, prueba haciendo esto:
Código vb:
Ver originalDim _var As Char
Console.Write("1º Pronostico: ")
_var = CChar(Console.ReadLine())
While !_var.Equals("1") Or !_var.Equals("2") Or !_var.Equals("X")
Console.WriteLine("ERROR, Inique un valor entre 1/X/2: ")
Console.ReadLine()
End While
Espero te sirva. Saludos!.