填空题

给定年份，下列程序用来判断该年是否是闰年，请填空。
Sub YN(　)
Dim X AS Integer
x＝Input Box("请输入年号")
If( x Mod 4=0 【10】 x Mod l00<　>0) 【11】 (x　Mod　400=0)Then
Print"是闰年"
Else
Print"不是闰年，是普通年份"
End If
End Sub