Как загрузить динамически в форму элемент управления? - VB
Формулировка задачи:
Можно ли во время работы в форму загрузить какой нибудь ЭУ, CoomandButton, и как это сделать?
Решение задачи: «Как загрузить динамически в форму элемент управления?»
textual
Листинг программы
Dim i As Integer
Private Sub Command1_Click()
Dim ctl As Control
Dim txt As TextBox
i = i + 1
Set ctl = Me.Controls.Add('VB.TextBox', 'TextBox' & i)
Set txt = ctl
txt.Move 100, i * 300 + 100, 1000, 270
txt.Text = 'TextBox ' & i
txt.Visible = True
End Sub