수다닷컴

Private Sub Command1_Click()
Text1.Text = Text1.Text + 1
End SubPrivate Sub Command2_Click()
Text1.Text =
End SubPrivate Sub Command3_Click()
If Text1.Text = 1 Then
MsgBox 인증 완료, ,
Else
MsgBox 인증 실패, ,
End If
End SubPrivate Sub Form_Load()
Text1.Locked = True
End Sub여기서 1.Text1.Text = Text1.Text + 1이거를 Label1.Label = Label1.Label + 1이렇게해봣는대 오류가뜨내요2.버튼을 누르면 텍스트에 1이 계속뜨는대 4개제한으로 할수없나요?3.If Text1.Text = 1 Then 여기서 Tnen 은왜쓰는건가요?4.Private Sub Command3_Click()
If Text1.Text = 1 Then
MsgBox 인증 완료, ,
Else
MsgBox 인증 실패, ,
End If
End Sub여기서 End If 는왜쓰는건가요?5.인증 완료돼고 Form2 나오게하고 싶은데 무엇을더 추가해야돼나요?

신청하기