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

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