Динамическое создание элементов управления

[^^()uSe]

Как можно динамически создать элемент управления,
предварительно не подключая его в компонентах.
Возможно ли вообще такое?
У меня есть скомпилированный .ocx, который имеет
пару свойств и один метод.
Можно ли, зная его программное имя, добавить его на форму?
Я пишу Set mucFoo = Me.Controls.Add(“FOO.ucFoo”, “FooControl”, Frame1)
объект создается, но определенные методы и свойства недоступны L.
Если его предварительно подключить в компонентах – все работает нормально.

[Firestorm]

...ууу...поиск по форуму.... гоняли такие темы...
вот подходящая статья...
http://www.azbukavb.narod.ru/teorie/ArraysA.html

[RayShade]

Автору темы - смени ник, или, согласно Правилам забаним мы тебя с форума

[Sebas]

2 RayShade

Так это он так MOUSE пишет....

[RayShade]

Это не мои проблемы, что он пишет По правилу в нике не должно быть столько небуквенных символов подряд

[Ducis]

А если абстрагироваться от имен , то надо метод Add юзать.
Выглядит использование этого метода так: Object.Add (ProgID,Name,Container)
Object - Объект в который вы добавляете контролы (хотя обычно говорят для которого добавляются объекты).
ProgID - описатель нового элемента управления
Name - имя нового элемента
Container - ссылка на контейнер для нового элемента, этот параметр можно пропускать.
Использование этого метода хорошо тем, что для каждого объекта вы можете задавать и код обработки событий, т.е эти контролы могут быть отдельными, а не элементами массива, что значительно удобнее.
Пример:
Private WithEvents NewButton As CommandButton 'Сообщаем системе что хотим использовать обработчик событий с кнопкой
Private Sub NewButton_Click() 'Код обработки события нажатия на кнопку
MsgBox "Вы нажали на новую кнопку"
End Sub
Private Sub Form_Click()
Set NewButton = Controls.Add("VB.CommandButton", "NewButton") 'при клике по форме появляется новая кнопка
NewButton.Visible = True
NewButton.Height = 1000
NewButton.Width = 1000
NewButton.Top = 0
NewButton.Left = 0
NewButton.Caption = "Нажми на меня!!!!"
End Sub
Удалить элемент управления легко:
Form1.Controls.Remove "NewButton"
Таким образом вы можете добавлять любой элемент управления, назначать ему обработку событий. В общем все хорошо.
Список интендификаторов стандартных элементов управления:
VB.ComandButton - Кнопка
VB.ComboBox - Раскрывающийся список
VB.DirListBox - Список директорий
VB.DriveListBox - Список устройств
VB.FileListBox - Список файлов
VB.Form - Форма
VB.Frame - Рамка
VB.HScrollBar - Горизонтальная полоса прокрутки
VB.Image - Изображение
VB.Label - Надпись
VB.Line -Линия
VB.ListBox - Список
VB.MDIForm - MDI форма
VB.Menu - Меню
VB.OLE - OLE Компонент
VB.OptionButton - Выбор
VB.PictureBox - Картинка
VB.Shape - Окружность
VB.TextBox - Текстовое окно
VB.UserControl - Пользовательский контрол
VB.UserDocument - Пользовательский документ
VB.VScrollBar - Вертикальная полоса прокрутки
VB.Timer - Таймер
И это еще не все, но больше не помню. Да вы и сами можете в Object Browser посмотреть в модуле VB. Да и еще, если вы добавляете ActiveX контрол, который требует лицензионных ключей, то не забудьте добавить и ключ.
Откуда я это взял уже не помню

[Rainbow]

Это статья Гайдара
http://www.vbstreets.ru/default.asp?page=library&id=addcont

[RayShade]

Вообще вся тема эта - сплошной оффтопик!

Ищите по форуму - это уже обсуждалось триста раз. Читайте правила, в общем.