Версия для печати
Нажмите сюда для просмотра этой темы в оригинальном формате |
Форум на Исходниках.RU > Работа с меню > Как создать меню во время выполнения про |
Автор: Dufa 30.03.04, 15:45 |
Создайте меню с любым именем, а внего вложите подменю с именем mnu <{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}> Private Sub Command1_Click() Load mnu(mnu.Count) mnu(mnu.Count - 1).Caption = mnu.Count - 1 mnu(mnu.Count - 1).Visible = True End Sub |