VBNet - Форум - массивы контролов в Visual Basic .net

Вопрос: массивы контролов в Visual Basic .net Добавлено: 04.07.03 11:25

Автор вопроса: agatische | ICQ: 168128739

В Visual Basic 6.0 можно было очень классно создавать массивы елементов, например кнопочек. Куда это всё делось в Visual Basic .net?

Ответить

Ответы Всего ответов: 7

Номер ответа: 1
Автор ответа:

Павел

Администратор

ICQ: 326066673

Вопросов: 368
Ответов: 5968

Web-сайт: www.vbnet.ru
Профиль | | #1

Добавлено: 04.07.03 12:36

Создавай в коде, типа

dim a() as Button

Redim a(5)

For i=0 to 5

a(i)=new button

a.Visible=True

me.controls.add a

Ответить

Номер ответа: 2
Автор ответа:

agatische

ICQ: 168128739

Вопросов: 3
Ответов: 8

Профиль | | #2

Добавлено: 04.07.03 12:53

Dim cmdButtonNum As Button(), i As Integer

ReDim cmdButtonNum(9)

For i = 0 To 9

cmdButtonNum(i) = New Button()

cmdButtonNum(i).Visible = True

Me.Controls.Add(cmdButtonNum(i))

Большое спасибо за ответ, вот это работает… но, встречный вопрос… как отловить хотя бы нажатия?

Ответить

Номер ответа: 3
Автор ответа:

Creator

Вопросов: 11
Ответов: 61

Профиль | | #3

Добавлено: 04.07.03 13:28

Примерно так: к тебя

Dim cmdButtonNum As Button(), i As Integer
ReDim cmdButtonNum(9)
For i = 0 To 9
cmdButtonNum(i) = New Button()
cmdButtonNum(i).Visible = True
Либо так: AddHandler cmdButtonNum(i).Click, AddressOf ClickButton
Причем ClickButton - процедура обработки
Либо так: создай делегата и используй .....
Me.Controls.Add(cmdButtonNum(i))
Next
Юзай должно жить .....

Ответить

Номер ответа: 4
Автор ответа:

agatische

ICQ: 168128739

Вопросов: 3
Ответов: 8

Профиль | | #4

Добавлено: 06.07.03 20:37

Здрасте, большое спасибо всем, кто ответил на вопрос…

Dim cmdButtonNum As Button(), i As Integer

ReDim cmdButtonNum(9)

For i = 0 To 9

cmdButtonNum(i) = New Button()

cmdButtonNum(i).Visible = True

Me.Controls.Add(cmdButtonNum(i))

AddHandler cmdButtonNum(i).Click, AddressOf cmdButtonNumClick

End Sub

Private Sub cmdButtonNumClick()

End Sub

.net ругается, ему не нравиться вот это "…AddressOf cmdButtonNumClick". Может я что-то не так делаю? С "делегаторами" никогда не сталкивался ещё, ну неумею я с ними работать :-)

Ответить

Номер ответа: 5 Автор ответа: Romeo ICQ: 200700724 Вопросов: 7 Ответов: 29	Профиль \| \| #5	Добавлено: 07.07.03 06:20
	Совет: создай в ВБ6 проект с масивом и UpgradeWizard'ом перекинь в .НЕТ Ответить

Номер ответа: 6 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968	Web-сайт: www.vbnet.ru Профиль \| \| #6	Добавлено: 07.07.03 08:14
	To Romeo: зачем переносить глюки? Лучше сделать по-умному. Ответить

Номер ответа: 7
Автор ответа:

Creator

Вопросов: 11
Ответов: 61

Профиль | | #7

Добавлено: 07.07.03 10:49

Добавь следующий код:

Private Sub cmdButtonNumClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdOK.Click

End Sub

И всё .....

Ответить

Страница: 1 |