用VB编一个程序 要求输入一个年份 判断出是否为闰年(vb判断日期大小的函数)

用VB编一个程序 要求输入一个年份 判断出是否为闰年(vb判断日期大小的函数)

首页维修大全综合更新时间:2024-04-02 17:47:58

用VB编一个程序 要求输入一个年份 判断出是否为闰年

DimyeaAsIntegerDimLeapYearAsBooleanyea=InputBox("请输入年号:"

)If((yeaMod4)=0)ThenLeapYear=((yeaMod100)>0)Or((yeaMod400)=0)EndIfIfLeapYearThenMsgBoxyea&"年是闰年。"ElseMsgBoxyea&"不是闰年"

大家还看了
也许喜欢
更多栏目

© 2021 3dmxku.com,All Rights Reserved.