Выход из процедуры

@dimajak · Регистрация: 30.01.2013

Author24 — интернет-сервис помощи студентам

На форме есть поле для ввода года и кнопка.
В процедуре Sub Btn_Click проверяю значение поля, например, на 4 знака. Если условие не удовлетворяет меня, то хочу прервать дальнейшее выполнение. Как это сделать?
Я так понимаю, что нужно создать процедуру Sub New, где будут устанавливаться (обнуляться) начальное значение.

PureBasic

Sub New
    EditText1.Text = "2020"
End Sub
 
Sub Button1_Click
    Label2.Text = EditText1.Text.Length
    If EditText1.Text.Length <> 4 Then
        xui.MsgboxAsync("Введите 4-значное число года", "Ошибка")
        New
    End If
End Sub

Или можно реализовать иначе?

@Runkin · 12.12.2020, 14:22

адекватно использовать "Return"

@Runkin 69 / 67 / 5 Регистрация: 22.12.2011 Сообщений: 261 Записей в блоге: 2
	12.12.2020, 14:22	2
	Сообщение было отмечено dimajak как решение Решение адекватно использовать "Return" 1

Выход из процедуры

Решение