VB中怎么表示整数啊，

2025-02-25 11:22:30

推荐回答（3个）

回答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

回答2：

才开始学吧？

dim year as integer
变量 year 为整数

多看 MSDN
多上网查

祝你顺利

回答3：

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