수다닷컴

jcbutton1 버튼이 timer1 에 의해 20초후에 활성화되고활성화된 jcbutton1 버튼을 누르면 비활성화되있던 Timer2가 활성화되면서Private Sub Timer2_Timer()If ProgressBar1.Value = 100 Then
Timer1.Interval = 10000
Form2.Show
Unload Me
Else
ProgressBar1.Value = ProgressBar1.Value + 1
End If
End Sub
이소스가 실행되는 방법좀 알려주세요..대략 제가 짜놓은 소스..Private Sub Form_Load()
Timer2.Enabled = False
jcbutton1.Enabled = False
End SubPrivate Sub jcbutton1_Click()
Timer2.Enabled = TrueEnd SubPrivate Sub Timer1_Timer()Timer1.Interval = 20000jcbutton1.Enabled = TrueEnd SubPrivate Sub Timer2_Timer()If ProgressBar1.Value = 100 Then
Timer1.Interval = 10000
Form2.Show
Unload Me
Else
ProgressBar1.Value = ProgressBar1.Value + 1
End If
End Sub
뭐가 문제지요 ? .. 따로 실행시키니 왼쪽 처음 jcbutton이 비활성화상태가 아닌 활성화 상태내요..질문 : 폼로드시 timer2 , jcbutton1 이 비활성화 상태 . 그리고 프로그램 킨지 20초가 지나면 jcbutton1이 활성화되고 jcbutton1을 누르면 Timer2가 활성화되면서 게이지가 꽉차고 자신은 닫히고 다음폼으로 넘어가는 방법..소스에 문제도 있으면알려주세요..

신청하기