윤년 평년 판별 프로그램
큰깃
2023.04.01
밑의 구구단 프로그램을 여쭈어봣던 고등학생입니다 ㅠ 이번에는 윤년 평년을 구하는 프로그램을 여쭈어보려고합니다 ㅠ((연도를 입력받아 입력받은 연도가 윤년인지 아닌지를 판별하는 프로그램을 작성하여보자.
4로 나누어 떨어지는 해는 우선 윤년으로 하고, 그 중에서 100으로 나누어 떨어지는
해는 평년으로 하며, 다만 400으로 나누어 떨어지는 해는 다시 윤년이 되도록한다.))
이게 문제이구요
Dim year As Integer
year = InputBox( , )
If year Mod 4 = 0 Then
If year Mod 100 = 0 Then
If year Mod 400 = 0 Then
MsgBox 윤년
Else
MsgBox 평년
End If
Else
MsgBox 윤년
End If
Else
MsgBox 평년
End If
이게 제가짠 소스인데
이방법을 말고 4,100,400 위치를 바꾼다던지 if문 1곳에 2개의 조건을 넣는다던지 해서 바꿔서 풀어보고 싶은데
도저히 제가 더이상은 방법을 모르겠네요 ㅠㅠ 도와주세요 ㅠㅠ
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2676066 | exe를 소스로 만드는법좀.. (3) | 회전력 | 2024-11-23 |
| 2676034 | 이런 창은 어떻게 지우나요? | 수련 | 2024-11-23 |
| 2676006 | 질문하나더~ | 찬바리 | 2024-11-23 |
| 2675930 | 작업관리자 차단 | 별빛 | 2024-11-22 |
| 2675901 | 숫자를 제외한 문자를 어떻게 나타내야될까요? | 진나 | 2024-11-22 |
| 2675871 | 거의마지막질문인데요 | 아메 | 2024-11-22 |
| 2675846 | 제가 완성햇는데요 ㅎ; | 거늘 | 2024-11-21 |
| 2675824 | 타이머. 프로그래스바 코드 질문입니다. (10) | 빛글 | 2024-11-21 |
| 2675798 | 이걸 머라고해야 할지모르지만 질문합니다 (2) | 리라 | 2024-11-21 |
| 2675772 | 구구단 함수 질문이요~! (1) | 테이 | 2024-11-21 |
| 2675746 | exe저장시 런타임53 에러 | 아픔이보여 | 2024-11-20 |
| 2675718 | ocx 설치법 | 달달한캔디 | 2024-11-20 |
| 2675630 | ""안에 큰따음표 넣기. | 터전 | 2024-11-19 |
| 2675519 | 컴파일 오류 ?? | 슬아라 | 2024-11-18 |
| 2675492 | 비베 수다 사이트채팅 접속방법 | 마법 | 2024-11-18 |
| 2675463 | ㅠㅠ;; | 지은 | 2024-11-18 |
| 2675434 | 타이머로 라벨바꾸는거 (2) | 대나무 | 2024-11-18 |
| 2675386 | 선형보간법 문의 | 나길 | 2024-11-17 |
| 2675328 | 프로세스 강제종료하는방법좀... (1) | 슬아라 | 2024-11-17 |
| 2675226 | 폼 관련 질문&버튼 관련질문 (7) | 한울 | 2024-11-16 |