Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.236.100.210] |
|
Сообщ.
#1
,
|
|
|
Создайте меню с любым именем, а внего вложите подменю с именем mnu
Private Sub Command1_Click() Load mnu(mnu.Count) mnu(mnu.Count - 1).Caption = mnu.Count - 1 mnu(mnu.Count - 1).Visible = True End Sub |