배수의합 간단히 가르쳐주실분..
한빛
2023.04.01
과제2-3 배수의 합을 구하는 프로그램을 작성한다.
조건1) 텍스트 상자 2개와 버튼 1를 배치한다.
조건2) 텍스트 상자 1에 숫자를 입력(2~9)까지의 수만 입력하도록 한다.
조건3) 1~100 까지의 숫자에서 텍스트 상자 1에 입력한 숫자의 배수의 합을 텍스트 상자 2에 출력하도록 한다.
예) 텍스트 상자 1에 2를 입력하면 텍스트 상자 2에는 2+4+6+....+100까지의 합이 출력되도록 한다.
이게 문제인데요.. 제가 밑에 보이는 소스까지 했는데요.. text1 박스에 숫자를 2-9 넣어서 배수 하는방법몰라서 ㅠ
간단히 가르쳐 주실분 계신가여
Private Sub Command1_Click()
Dim i, x As Integer
Dim a As IntegerFor i = 1 To 100
If i Mod 10 = 0 Then x = x + i
NextText2.Text = x
End Sub
번호 | 제 목 | 글쓴이 | 날짜 |
---|---|---|---|
2676125 | Themida 패킹시 윈도우7은 호환 하지 못하나요? | 라 | 2024-11-24 |
2676093 | 현재프로그램 파일이름을 추출하는걸알고싶습니다 (1) | 도1도캣 | 2024-11-24 |
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 |