Даны целые числа a и b.Написать программу ,которая выводит число 1,если числа равны ,и число 0 в противном случае

Dim a As Integer        Dim b As Integer        a = InputBox("Введите а")        b = InputBox("Введите b")        If a = b Then MsgBox("1") Else MsgBox("0")