Const MENU_MAX As Integer = 3 '上限の時 index = (index + 1) Mod MENU_MAX '下限の時 index = (index - 1 + MENU_MAX) Mod MENU_MAX