VB中怎么表示整数啊,

来源:百度知道 编辑:UC知道 时间:2024/05/17 07:37:45
一条题目,今年是几几年,一个文本框表示闰年,一个表示不是闰年
要怎么做啊

表示整数可以在声明部分用
表示整形:
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

才开始学吧?

dim year as integer
变量 year 为 整数

多看 MSDN
多上网 查

祝你顺利

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