아 제발좀 도와주세요 ㅠㅠ
초롱꽃
2023.04.01
Dim oc, fc1, fc2, sc1, sc2 As Long
oc = Val(Text1.Text)
If oc 1000 Then
MsgBox 1000원이상이여야합니다. - 만약에 1000원이 아니면이 메시지가 뜨면서 text1.text로 커서가 이동한 다음에 변경하지 않으면 계속 메시지박스가 뜨면서 반복되게해주세요
Ifoc Mod 500 0 Then
MsgBox 500원 단위로 써주세요. - 만약에 500원 단위가 아니면이 메시지가 뜨면서 text1.text로 커서가 이동한 다음에 변경하지 않으면 계속 메시지박스가 뜨면서 반복되게해주세요 그리고 이렇게 쓰면 500원 단위로 안써도 진행이되는데 소스가 틀린건가요?
End If
End If
fc1 = oc * 11 + 70000
fc2 = fc1 * 0.8
sc1 = oc * 20 + 70000
sc2 = sc1 * 0.8
- fc2랑 sc2를 계산해서 500원단위로 안떨어지면 500원단위로 올림을해서 예를들어 45433으로되면 45500 568100이면 568500 이런식으로 어떻게 못하나요? ㅠㅠ 초보자랑 아무리 책을 찾아봐도 안나오네요.
Text2.Text = fc2
Text3.Text = sc2
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2704558 | 전체 변수 선언 방법? (1) | 사자자리 | 2025-08-11 |
| 2704530 | 여러분 급해요.. | 시윤 | 2025-08-11 |
| 2704498 | 위대한 수다님들 질문하나할게요 (운영체제관련) (3) | 아리에스 | 2025-08-10 |
| 2704474 | 사용자명 확인하기 | 예님 | 2025-08-10 |
| 2704446 | 블랙리스트 (3) | 마루한 | 2025-08-10 |
| 2704392 | 비베 책 추천점해주세요~ | 이플 | 2025-08-09 |
| 2704366 | 정말 궁금해서 물어봅니다 . | agine | 2025-08-09 |
| 2704339 | 서버on off 질문 (1) | 2gether | 2025-08-09 |
| 2704312 | Microsoft Tabbed Dialog Control 6.0 질문 | 영미 | 2025-08-09 |
| 2704256 | 사이트 접속자... (1) | 계획자 | 2025-08-08 |
| 2704228 | 채팅방 사이트 로그인소스하고 채팅방 접속소스좀.. (1) | 초롱꽃 | 2025-08-08 |
| 2704197 | 커맨더 버튼 색깔변경 | 여자 | 2025-08-08 |
| 2704170 | winhttp로 웹연동을 할수 있나요? (4) | 나길 | 2025-08-07 |
| 2704063 | 고수분들 답변좀요 ~~~ | 볼수록매력 | 2025-08-06 |
| 2704036 | 커맨드버튼 입체감 살리는법 | 알찬바로 | 2025-08-06 |
| 2704006 | msgbox 내용 텍스트 박스로 출력하기 (2) | 조으다 | 2025-08-06 |
| 2703955 | 네크워크 어댑터관련 질문입니당. | 별햇님 | 2025-08-05 |
| 2703925 | 지금 매우 비효율적인 방법을 쓰고있는데요 쉬운방법 없을까요? (2) | 리네 | 2025-08-05 |
| 2703870 | 리스트에있는것을클릭하고다운하기.... | 핫자두 | 2025-08-05 |
| 2703838 | 어떻게 해야되나요? | 환히찬 | 2025-08-04 |