Написать программу определяющую равны ли между собой два введенных числа( vba)

Sub xyz()     a = Val(InputBox("a="))     b = Val(InputBox("b="))     If a = b Then         MsgBox "Числа равны"     Else         MsgBox "Числа не равны"     End If End Sub