- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
If Not CheckX Then Goto 1
For i = 0 to USecX
Goto 2
1:
For i2 = 0 to USecY
2:
...
If CheckX Then Goto 3
Next
If Not CheckX then Goto 4
3:
Next
4:
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 1
−84
If Not CheckX Then Goto 1
For i = 0 to USecX
Goto 2
1:
For i2 = 0 to USecY
2:
...
If CheckX Then Goto 3
Next
If Not CheckX then Goto 4
3:
Next
4:
Как-то потребовалось выполнить немалый участок кода, но в двух разных случаях нужно было использовать два разных фора. В отдельную процедуру было очень неудобно выносить (пришлось бы передавать слишком много переменных), так что пришлось сделать этот... свичджампинг форов :)