нажать F1 не позволяет религия или мама?

F1You can use multiple expressions or ranges in each Case clause. For example, the following line is valid:

Case 1 To 4, 7 To 9, 11, 13, Is > MaxNumber

Note The Is comparison operator is not the same as the Is keyword used in the Select Case statement.

Если одна ветка case выполнилась, другая выполняться не будет, так что смело можно писать Case n To k

Истина где-то рядомнабирал вопросВсе тот же F1If testexpression matches any Case expressionlist expression, the statements following that Case clause are executed up to the next Case clause, or, for the last clause, up to End Select. Control then passes to the statement following End Select. If testexpression matches an expressionlist expression in more than one Case clause, only the statements following the first match are executed .