Я когда-то рисовал "многоэтажный" Case для vbs пакета, но не стал включать. Т.к. у меня при добавлении точек OnElse оставался на своём месте, а точки шли после него - некрасиво как-то, а отладку не осилил.
В общем, в аттаче то, как я себе его представлял на тот момент.
ps схема в примере под старый пакет vbs, но поправить несложно.