| ilim | Дата: Среда, 09.11.2011, 22:37 | Сообщение # 1 |
 Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
| 'Добавьте TextBox на форму. В свойствах TextBox'а измените Index на 0
'Этот пример покажет, как добавить TextBox'ы во время выполнения
'программы Вы получите новый TextBox под именем Text1(1).
'Вместо TextBox, конечно, можно использовать и другие контролы
Private Sub Form_Load()
Load Text1(1)
Text1(1).Left = 400
Text1(1).Top = 400
Text1(1).Visible = True
'Для того, чтобы добавить еще textbox, просто добавьте:
'Load Text1(2)
'Text1(2).Left = 400
'Text1(2).Top = 200
'Text1(2).Visible = True
End Sub
www.ilim.kz
|
| |
|
|
