Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: массивы контролов в 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

Next

Ответить

Номер ответа: 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))

Next

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

Ответить

Номер ответа: 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

Next

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 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам