二、 将下列语句改写成vb表达式一、         将下列语句改写成vb表达式（1）、判断某一年year（设year>=1900）是否为闰年.Year是闰年要满足下列条件：year能被4整除但不能被100整除,或者能被400整除.

Private Sub Command1_Click()Dim year As Longyear = InputBox("请输入一个大于或者等于1900的整数",,1900)If year Mod 4 = 0 And year Mod 100 0 ThenPrint year & "是闰年"ElseIf year Mod 400 = 0 ThenPrint yea...