Question

VB中怎么表示整数啊，

一条题目，今年是几几年，一个文本框表示闰年，一个表示不是闰年
要怎么做啊

Answer 1

表示整数可以在声明部分用
表示整形：
Dim year As Integer
表示长整形：
Dim year As long
2个表示范围不一样，不再赘述。
判断闰年，用不着文本框，直接在窗体内显示结果，用条件判断语句即可，代码如下：
Private Sub Form_Click()
Dim year As Integer
year = Val(InputBox("请输入年份", "判断闰年"))
If year Mod 400 = 0 Then
Print "公元"; year; "年是闰年"
Else
If year Mod 4 = 0 Then
Print "公元"; year; "年是闰年"
Else
Print "公元"; year; "年不是闰年"
End If
End If
End Sub

Answer 2

才开始学吧？

dim year as integer
变量 year 为 整数

多看 MSDN
多上网 查

祝你顺利

Answer 3

tcboy5488的答案基本上正确但是代码有冗余：如果一个数是400的整数倍那么他绝对是4的整数倍所以没有必要嵌套一个if判断