Папка Program -> ToolStripMenu

[netdemon]

Вот такая закавыка.

Получаю имена папок из пункта меню пуск программы и заполняю ими пункты ToolStripMenu. А вот как дальше сделать ветвление ума не приложу. Может кто-нибудь помочь?

Код: Выделить всё

ProgPath = My.Computer.FileSystem.SpecialDirectories.Programs
        For Each fDirectory As String In My.Computer.FileSystem.GetDirectories(ProgPath, FileIO.SearchOption.SearchAllSubDirectories, "*")
            ReDim Preserve PathCol(i)
            PathCol(i) = fDirectory
            frmBar.ProgMenu.Items.Add(PathCol(i))
            i = i + 1
        Next

[Nord777]

... и заполняю ими пункты ToolStripMenu

Где??

[netdemon]

В принципе можно и парсер написать, но вот как добавить подпункты в меню ума не приложу.

[Viper]

В принципе можно и парсер написать, но вот как добавить подпункты в меню ума не приложу.

У каждого пункта меню есть коллекция DropDownItems, а у коллекции метод Add. Думаю дальше понятно.

[netdemon]

В принципе можно и парсер написать, но вот как добавить подпункты в меню ума не приложу.

У каждого пункта меню есть коллекция DropDownItems, а у коллекции метод Add. Думаю дальше понятно.

Спасибки. я почему то подумал что DropDownItems относится к Drag & Drop