¿Cómo utilizar VB para escribir un programa que requiere la entrada de un año y determina si es un año bisiesto?

Dim yea As Integer\x0d\Dim LeapYear As Boolean\x0d\yea = InputBox("Ingrese el número de año:")\x0d\If ((yea Mod 4) = 0) Then\x0d \ LeapYear = ((yea Mod 100) gt; 0) Or ((yea Mod 400) = 0)\x0d\End If\x0d\If LeapYear Then MsgBox sí amp; "El año es bisiesto". amp; "Sin año bisiesto"