Console.Writeline("Welcome to this fantastic number guessing game. I will lead you find out the real number ")
Dim Randomclass as New System.Random(315673)
REALNUM = RandomClass.Next(1, 51)
Console.Writeline (" Enter a number now " )
Answer= Console.Readline()
Console.Writeline ("IT IS TOO HIGH!!! TRY AGAIN !")
elseif Answer < REALNUM then
Console.Writeline ("IT IS TOO LOW!!! TRY AGAIN !")
LOOP UNTIL Answer = REALNUM
Console.Writeline ("Well done!!! I know you can get this!! ")