一个长方形的周长为30，若它的一边长x，则此长方形的面积为[ ]

A．x（30﹣2x）

B．x（30﹣x）

C．x（15﹣x）

D．x（15+x）

给定年份，下列程序用来判断该年是否为闰年，请填空。
提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。
Private Sub Comand6_Click()
Dim y As Integer
y=InputBox("请输入年份")
If(y Mod 4=0______y Mod 100＜＞0)or(y Mod 400=0)Then
　　Print"是闰年"
Else
　　Print"是普通年份"
End If
End Sub