수다닷컴

만약 모듈1에 Public Sub start()
a = 0
Do
a = Val(a) + 1
Form1.Text1.text = a
sleep 10
DoEvents
Loop
End Sub
이렇게 있다고쳐요그리고 Form1에는Private Sub CandyButton1_Click()
Text1.Text = 50
MsgBox 성공 , , 알림
Else
call 모듈1
End If
End Sub
이렇게 되있으면 처음에만 50이면 성공이라뜨고 50이아니면모듈1처럼 그냥 아무런이벤트없이 +1만 계속하게되요...어떻게하죠 타이머없이숫자가 21이면 아니여도 계속 모듈1 이벤트를 실행하도록하게요..그러니까 지금 ( 21틀리면 모듈1이벤트실행 22 23 24 25 26 이렇게 숫자만올라가요 50이면 성공이라뜨고 ..)(21 틀리면 모듈1이벤트실행 22 틀리면 모듈1이벤트실행 '''' 49 틀리면 모듈1이벤트실행 50 성공 )이렇게 하고싶네요 ㅠㅠ ↑소스를 다보여주고싶은데 소스유출이되서 ㅜㅜ저런 예시를 쓰게되네요

신청하기