MyTetra Share
Делитесь знаниями!
программное создание контролов, MS Access
09.12.2017
23:43
Текстовые метки: Controls
Раздел: VBA

Не получается программно создавать


Может потому, что метода Controls.
Add в VBA нету?

P.S. Однако... В Excel Controls.
Add есть... А в Access нету.

Эта тема была разделена из темы "Создание массива контролов в VBA"


А вот и выход

Access не позволяет добавлять Control в форму runtime.
Так что будем как волшебники, конструировать саму форму:

Dim pForm As Form

Dim pLabel As Label

Dim pTextBox As TextBox

 

Set pForm = Application.CreateForm()

 

Set pTextBox = Application.CreateControl(pForm.Name, acTextBox, , , , 400, 400, 1000, 300)

Set pLabel = Application.CreateControl(pForm.Name, acLabel, , , , 400, 200, 1000, 200)

pLabel.Caption = "MyLabel"

DoCmd.OpenForm pForm.Name, acNormal

Так же в этом разделе:
 
MyTetra Share v.0.52
Яндекс индекс цитирования