当前位置:首页 >> 其它课程 >>

vb判断是否闰年


1、给定年份,下列程序用来判断该年是否闰年,请补充完该程 序。提示:闰年的条件是年号可以被 4 整除但不能被 100 整除, 或者能被 400 整除。 Private Sub Command6_Click() Dim y As Integer y = InputBox("请输入年号") If (y Mod 4 = 0 or (y Mod 400 = 0) Then Print "是闰年" Else Print "是普通年份" End If End Sub y Mod 100<>0)

2、假设我国现有人口为 12 亿,设年增长率为 1%,编写程序, 计算多少年后我国人口达到或超过 15 亿。 Private Sub Form_Click() Dim P As Double, R As Single, N As Integer

R = 0.01 N=0 Do While P <= 1500000000 P=P+P*R Loop Print N; "年后,人口为"; P End Sub



相关文章:
VB期末考试大题答案1
Sub Command3_Click() End End Sub 7 输入一公元年号,判断是否闰年闰年...(1)所考 3 门课程即英语、高等数学、VB 的总分超过 285 分,并且每门课程的...
vb上机实验1
实验1 求圆的面积、表面积和体积一、实验目的与要求 1.熟练掌握 VB 程序的...给定年号与月份,判断该年是否闰年,并根据给出的月份来判断是什么季节 和该月...
VB编程题 (有答案)
VB编程题 (有答案)_IT认证_资格考试/认证_教育专区。VB编程题答案1...end if 4 输入一年份,判断是否闰年,并显示有关信息(判断闰年的条件是:...
VB
VB_计算机软件及应用_IT/计算机_专业资料。无答案 题目 1. 求 1!+2!+3!+...13. 输入一个年份,判断该年是否闰年,并通过消息框显示出结果。运行效果如图 ...
vb练习
3、 创建一个判断输入数字是否闰年的程序,通过这个习题掌握运算符的优先级顺序。...新建一个 VB 工程,在窗体下方添加一个按钮,按钮的名称为“Command1”,按 钮上...
江苏省2009年12月信息技术学业水平测试VB操作题WORD含答案
江苏省2009年12月信息技术学业水平测试VB操作题WORD含答案_电脑基础知识_IT/计算机...中输入一个年号,判断是否闰年,并输出判断结果 “是闰年”或“不是闰年”...
vb练习题
VB 中,执行“IF A>5 then b=10 else b=20”语句后(A 变量),B 值...窗体、控件、模块 7.下列逻辑表达式中能完全正确表示条件 "year 是闰年"的是 ...
将2000年到3000年中的所有闰年年份输出并统计出闰年的...
将2000年到3000年中的所有闰年年份输出并统计出闰年的总年数_IT认证_资格考试/认证_教育专区。#include<stdio.h> void main() {int i; for(i=2000;i<=...
更多相关标签: