Сравнение переменной со случайным числом. Integer и Random не совместимы - Visual Basic .NET

Формулировка задачи:

Дана задача: "Программа вводит число А с клавиатуры и генерирует число В как целое случайное число из интервала от 1 до 5 до тех пор, пока А и В не совпадут." Ну я все сделал но на A = B он говорит что-то типо Integer и Random не совместимы Как решить эту проблему?

     Dim A As Integer
     Dim B As New Random()
     Console.Write("Введите число от 1 до 5 - ")
     A = Console.ReadLine
     Do Until A = B
     Console.WriteLine(B.Next(1, 6))
     Loop
     Console.ReadLine()

Решение задачи: «Сравнение переменной со случайным числом. Integer и Random не совместимы»

textual
                            Листинг программы 
                        

                            Dim A, B As Integer
Dim rnd As New Random()
A = 3
Do
    B = rnd.Next(1, 6)
Loop Until A = B
                        