Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        TextBox1.Text = 150

        Timer1.Enabled = True

        For i = 1 To 100

            If Timer1.Enabled = True Then

                Timer1.Enabled = False

                Timer1.Interval = 1000

                TextBox1.Text = TextBox1.Text - 1

                Timer1.Enabled = True

            End If

        Next

    End Sub


코드만 봐선 뭔지 감도 안올거 같은데 대충 150이라고 텍스트에 쓴 후에


버튼누르면 1초에 1씩 줄어들어서 50까지 줄어들게 만드는 프로그램을 만드려는중


근데 뭐 아무리 짱구를 돌려봐도 버튼누르면 바로 텍스트 숫자가 50이 됨 ㅅㅂ