424 런타임에러 질문 ㅠㅠ
우미
Private Sub Command2_Click() If Form2.Text4.Text = 1 Then Text2.Text = 가위 Form2.Text4.Text = Form2.Text4.Text - 1 Else Form2.Text4.Text = 0 MsgBox 가위 카드가 부족합니다, , 대결 Unload Me Form2.Show End IfDim a As IntegerDim b As IntegerFor a = 1 To 3b = Int(Rnd * 3) + 1Next If b = 1 Then Text1.Text = 가위 End If If b = 2 Then Text1.Text = 바위 End If If b = 3 Then Text1.Text = 보 End If If Text1.Text = 가위 And Text2.Text = 가위 And Form2.Text2.Text = 1 Then MsgBox 비겼습니다, , 대결 MsgBox 돌아갑니다.., , 대결 Unload Me Form2.Show ElseIf Text1.Text = 가위 And Text2.Text = 바위 And Form2.Text2.Text = 1 Then MsgBox 이겼습니다, , 대결 MsgBox 별1개를 획득하였습니다, , 대결 Form2.Text2.Text = From2.Text2.Text + 1 Unload Me Form2.Show ElseIf Text1.Text = 가위 And Text2.Text = 보 And Form2.Text2.Text = 1 Then MsgBox 졌습니다, , 대결 MsgBox 별1개를 잃었습니다, , 대결 Form2.Text2.Text = From2.Text2.Text - 1 Unload Me Form2.Show ElseIf Text1.Text = 바위 And Text2.Text = 가위 And Form2.Text2.Text = 1 Then MsgBox 졌습니다, , 대결 MsgBox 별1개를 잃었습니다, , 대결 Form2.Text2.Text = From2.Text2.Text - 1 Unload Me Form2.Show ElseIf Text1.Text = 바위 And Text2.Text = 바위 And Form2.Text2.Text = 1 Then MsgBox 비겼습니다, , 대결 MsgBox 돌아갑니다.., , 대결 Unload Me Form2.Show ElseIf Text1.Text = 바위 And Text2.Text = 보 And Form2.Text2.Text = 1 Then MsgBox 이겼습니다, , 대결 MsgBox 별1개를 획득하였습니다, , 대결 Form2.Text2.Text = From2.Text2.Text + 1 Unload Me Form2.Show ElseIf Text1.Text = 보 And Text2.Text = 가위 And Form2.Text2.Text = 1 Then MsgBox 이겼퐔 이겼습니다, , 대결 MsgBox 별1개를 획득하였습니다, , 대결 Form2.Text2.Text = From2.Text2.Text + 1 Unload Me Form2.Show ElseIf Text1.Text = 보 And Text2.Text = 바위 And Form2.Text2.Text = 1 Then MsgBox 졌습니다, , 대결 MsgBox 별1개를 잃었습니다, , 대결 Form2.Text2.Text = From2.Text2.Text - 1 Unload Me Form2.Show ElseIf Text1.Text = 보 And Text2.Text = 보 And Form2.Text2.Text = 1 Then MsgBox 비겼습니다, , 대결 MsgBox 돌아갑니다.., , 대결 Unload Me Form2.Show End IfEnd Sub
가위바위보 모든 경우의 수를 다 충족시켜서
쫌 소스가 긴데
비슷한 소스 하나만 딱 올려서 질문할게여
form2.text2.text = from2.text2.text - 1
이 부분에서만 오류가 발생하네요;;
비겼을때는 그냥 폼2로 잘 돌아가지던데...
어떻하죠?
-
푸르나 2024-12-28
form2도 있고 form2에 text2도 있는데 왜이럼 ㅠㅠ
-
율아 2024-12-28
424 런타임은 어떤 개체가 없을때 일어나는 건데요 form2 와 text2 가 있는지 살펴보세요
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 2694041 | 모듈은 무었인가요? | 하람 | 2025-05-07 |
| 2694013 | 비쥬얼베이직 책 추천좀요^^... | 초코맛캔디 | 2025-05-07 |
| 2693985 | 리소스문제데요...ㅋㅋ (1) | 아리에스 | 2025-05-07 |
| 2693929 | 했는데 ㅠㅠ | 볼수록중독 | 2025-05-06 |
| 2693870 | 수정좀요 ^^;; (2) | 차오름 | 2025-05-06 |
| 2693812 | ※고구마는 보아라 (6) | 솔길 | 2025-05-05 |
| 2693789 | 마우스가있는곳의 좌표 보기 | 하예진 | 2025-05-05 |
| 2693759 | 실시간으로 서버 열렸는지 닫혔는지 확인하는법좀 | 참이 | 2025-05-05 |
| 2693728 | 로그인 유지 관련 제발 성실답변좀요 | 에녹 | 2025-05-04 |
| 2693705 | 아 재질문합니다 (5) | 모아 | 2025-05-04 |
| 2693677 | Dim a (1 to 11) AS Long에서 11을 K로 놓는 방법 질문 | 진주 | 2025-05-04 |
| 2693648 | 55런타임오류..... | 가론 | 2025-05-04 |
| 2693620 | 수다님 꺼처럼 하는방법좀요 | PinkPearl | 2025-05-03 |
| 2693564 | ir creator 에대해서 질문드립니당.. | 글고운 | 2025-05-03 |
| 2693540 | 배열 간 이동시키기 | 악당 | 2025-05-03 |
| 2693518 | 비베 WebBrowser1 오류 도움구합니다 | 수예 | 2025-05-02 |
| 2693491 | 블로그스크랩기 , 사이트 글가져오기 질문합니다. | Addicted | 2025-05-02 |
| 2693437 | 폼 에대해서요 ㅜ_ㅜ | 돌삥 | 2025-05-02 |
| 2693412 | 컴파일 오류떠여 ㅠㅠ | 꺆잉 | 2025-05-01 |
| 2693388 | 프로그램으로 프로그램 만들기질문 | 하루키 | 2025-05-01 |