On the output form all the leap year 2000 ~ 2100, calls for the Function process to judge for determining a given year?

CodePudding user response:

Keeping a job

CodePudding user response:

Handwritten, no debugging, you consult:

 
As a Boolean function runnian (byval year as an integer) 
If year mod 400=0 then 
Runnian=true 
Elseif year mod=0 and 4 year mod 100 & lt;> 0 then 
Runnian=true 
The else 
Runnian=false 
End the if 
End the function 

Private sub form_load () 
Dim as integer I 
For I=2000 to 2100 
If runnian (I) then 
The debug. Print I 
End the if 
Next 
End sub 

CodePudding user response:

Pretty admire Mickey Mouse, is all to the code,
But personally feel, obvious operations, the graduation design topic can't spoil them, or out is also evil in this industry,

CodePudding user response:

1/f, the reference lines of reply:

homework is

You are so smart! Is to hand in the lab assignments (? ￣? ￣?)

CodePudding user response:

refer to the second floor milaoshu1020 response:

written by hand, not debugging, you consult:

 
As a Boolean function runnian (byval year as an integer) 
If year mod 400=0 then 
Runnian=true 
Elseif year mod=0 and 4 year mod 100 & lt;> 0 then 
Runnian=true 
The else 
Runnian=false 
End the if 
End the function 

Private sub form_load () 
Dim as integer I 
For I=2000 to 2100 
If runnian (I) then 
The debug. Print I 
End the if 
Next 
End sub 

Thank you, but I have already written out? 'del `?)

CodePudding user response:

reference 3 floor crispy large ice cream response:

very admire the Mickey Mouse, is all to the code,
But personally feel, obvious operations, the graduation design topic can't spoil them, or out is also evil, the industry

Well, don't curse in this industry, I want to change careers, as a freshman of female college students, staring at the computer every day dizziness, the whole people to bear, be bald, there is no object, can't dozen of Kings, very not easy adjusting the code also can't run, poor child,