1樓:匿名使用者
1900年到2200年之間的所有閏年顯示在窗體中的命令:
dim i as integer
for i = 1900 to 2200
if (i mod 4 = 0 and i mod 100 <> 0) or (i mod 400 = 0) then
lst.additem i
end if
next i
採用的vb的變數進行的命令。
2樓:匿名使用者
dim i as integer
for i = 1900 to 2200
if (i mod 4 = 0 and i mod 100 <> 0) or (i mod 400 = 0) then
lst.additem i
end if
next i
3樓:匿名使用者
dim i as integer
for i=1900 to 2200
if i mod 400=0 then
debug.print i
elseif (i mod 4=0) and (i mod 100<>0) then
debug.pint i
end if
next i
編寫程式,輸入2000到2200年中所有的閏年
4樓:約_束
int year;
printf("請輸入年份(2000~2200)!");
scanf("%d",year);
if(year<2000 && year>2200)else
5樓:匿名使用者
只需要簡單的迴圈加判斷
#include"stdio.h"
void main()
編寫乙個程式,將公元2000年到公元3000年之間所有閏年年號顯示出來 20
6樓:務驕卞虹影
提供一種思路:先判斷年份是否是100的倍數且該年份是否除以400不等於0,若滿足,則為平年。其次判斷年份除以4是否等於0,如果等於0,則為閏年。最後剩下的情況都是平年的情況
下面是乙個c++的判斷是否為閏年的函式,若是,則返回true,否則,返回false
bool
fun(intn)
7樓:獨飇力姣麗
void
main()
8樓:桑職嚴子實
vb6.0
程式:private
subform_click()a=
0fori=
2000
to3000
if(i
mod4=0)
and(i
mod100
<>0)or
imod
400=
0then
printi;a
=a+1
ifamod10=0
then
endif
next
endsub
c編#include
main()}
在vb.net中,如何計算出2000-2100年之間的閏年?輸出到文字框,並統計輸出閏年的個數?主要是統計個數
用vb語言編寫程式,用VB語言編寫程式
我用兩個文字框和乙個命令按鈕來實現 其中文字框 text1 用來存放 輸入資料 text2用來存放處理後的結果 用command1實現以上功能 private sub command1 click text2.text val text1.text 10end sub 你把要求說的不太詳細,我只是按...
用vb語言編寫程式隨機生成兩個,用vb語言編寫乙個程式,隨機生成兩個100 300之間的正整數,顯示他們,並求這兩個數的最大公約數
瘋狂小鳥 如圖所示,望採納。 冉冉曦丶 imports system.math public class form1 private sub button1 click sender as object,e as eventargs handles button1.click dim a,b as ...
用VB,編寫程式,實現2,10,16進製制的轉換,不要太簡單的那種
直接呼叫以下函式過程即可 二進位制轉十進位制 public function b2d vbstr as string as long dim vlen as integer 串長 dim vdec as long 結果 dim vg as long 權值 dim vi as long 位數 dim ...
要求是用vb選擇結構編寫程式實現輸入值
看的頭暈 if a b then if b c then goto s else if a c then n b b c c n goto s else n b b a a c c n goto s end if end if else if b c then n a a c c n goto s ...
用vb編寫程式隨機生成1099互不相同的整數將
好吧,沒有研究過。不過用隨機函式加氣泡排序法應該可以做出來的吧。同求,希望高手們寫注釋啊!private sub command1 click clsdim a 1 to 10 as integerfor i 1 to 10 randomize a i int rnd 90 10 for j 1 t...