Question

Який результат виконання фрагменту кода на VBA?
Dim i As Integer
For i = 0 To 4
Select Case i
Case 1
Debug.Print "Один" : GoTo brk
Case 0
Debug.Print "Нуль"
Case 2
Debug.Print "Привіт світ"
End Select
Next i
brk:

Answer 1

Ответ:

Объяснение:

Вообще-то - не скомпилируется, метка brk не определена

А задумывалось, наверное, так

Это цикл от 0 до 4,

в котором, в операторе выбора Select Case

в зависимости от счетчика цикла - переменной i

выводится:

Если i = 0 --"Нуль",

Если i = 1 --"Один", потом переход на метку brk, которой нет

Если убрать оператор GoTo brk,

то для  i = 2 напечатает "Привіт світ"

Прокрутит еще дважды цикл для i = 3 и i = 4 просто так.