Как создать массив Текст Боксов в вб.нет ?

[student-uni]

Как создать массив Текст Боксов в вб.нет ? /в тексте и на форме/

/Нужно заливать значения из массива чисел каждое в отделъныи тексбокс/

Ломает по отдельности писать в каждыи текстбокс
Хочтеся залить в цикле
типа

For i =1 to 10

TExtBox1.Text(i) = MyArray(i)

Next

[Sebas]

Private textBoxes() as textbox

[student-uni]

а как отобразитъ на форме
control.add ?

[Sebas]

поищи по форуму, уж 100 раз спрашивали...

[mdx]

А можно воспользоваться TextBoxArray (Microsoft.VisualBasic.Compability.VB6)

[GSerg]

Microsoft.VisualBasic.Compability.VB6 лучше не использовать вообще.

[RCLIO]

Здравствуйте.

Создаю textBox:

Код: Выделить всё

Public txt() As TextBox

Код: Выделить всё

ReDim txt(0)
txt(0) = New Windows.Forms.TextBox
txt(0).Name = "ggf"
txt(0).Location = New System.Drawing.Point(8, 8)
txt(0).Size = New System.Drawing.Size(200, 20)
txt(0).TabIndex = 0
Panel1.Controls.Add(txt(0))
txt(0).Text = "текст"

Данный текстбокс создается нормально. Но его нельзя редактировать. - Пытаюсь ввести в него текст, а он залочен.
Чего тут не хватает?

[MIT]

Но его нельзя редактировать. - Пытаюсь ввести в него текст, а он залочен.

А у меня все работает. Скорее всего ты что-то там начудил

добавлено: проверь свойства Enabled и Readonly

[RCLIO]

Хм. Вот в чем дело:

Код: Выделить всё

Panel1.Controls.Add(txt(0))

с

Код: Выделить всё

Controls.Add(txt(0))

работает. Панель виновата?

[MIT]

Панель виновата?

Может не сама панель, а ее настройки?

[RCLIO]

Я кроме автоскроллинга ничего не настраивал. Хотя... Создал вторую панель - в ней все работает.

Спасибо.

--------------------------
Понял в чем была моя ошибка:

Код: Выделить всё

    Private Sub Panel2_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel2.Paint
        Panel2.Focus()
    End Sub

--------------------------
А вот как у массива контролов перехватить событие?
например изменил я текст в TextBox(5).Text...

[MIT]

Перехватить - сабклассинг. Вообще, по идее, для этого существует WithEvents, но с массивами классов он не работает. В VB6 недавно обсуждалась подобная тема - поищи.

Вот, кстати, оно.

[RCLIO]

Ээ... Так в vb6 с этим вообще просто было:
Для массива контролов Text1:

Код: Выделить всё

Private Sub Text1_Change(Index As Integer)
...
End Sub

Неужели в .net нужно что-то изобретать?

[ndemidov]

А вот как у массива контролов перехватить событие?
например изменил я текст в TextBox(5).Text...

AddHandler .TextChanged, AddressOf Имя_моей_функции_подписанной_на_получение_события

Private Sub Моя_фунция(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim TheTextBox as textbox = ctype(sender, TextBox)
' для TheTextBox было вызвано соответсвующее событие.

т.е. почитай про AddHandler