Задумано так, что вместо MessageBox.Show("Pause")
Будет выполняться код.
Задача была – получить бесконечный цикл. Так, цикл получил, а как теперь остановить его – не знаю.
На форме только Button и CheckBox.
Нажимаю на Button – процесс пошел.
Хотел убрать галочку, что бы снять условие для работы бесконечного цикла, но CheckBox «не хочет».
Похоже, я пытаюсь влезть в работающий процесс, а VB этого не позволяет.
Может кто знает, как быть
- Код: Выделить всё
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
StarteSleep()
End Sub
Private Sub StarteSleep()
While Me.CheckBox1.Checked
MessageBox.Show("Pause")
Sleep(60000)
End While
End Sub