16 Январь 2009

Как добавить на форму TextBox?

TextBox |  Таги:

Как добавить на форму TextBox?
Во время выполнения программы.

Option Explicit

Private Sub Command1_Click()
Dim Text1 As Object

Set Text1 = Me.Controls.Add("Forms.TextBox.1", "Text1")

Text1.Visible = True
Text1.Top = 1000
Text1.Left = 1000

End Sub

Запись опубликована on 16.01.2009 at 9:00 и размещена в рубрике: TextBox. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



Оставить комментарий

Я не робот.