В процессе портирования некой программы с Visual Basic, нашел гениальную альтернативу оператору ! Select Case bln_Сменить_направление_вращения Case True bln_Сменить_направление_вращения = False Case False bln_Сменить_направление_вращения = True End Select