Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Передача массива элементов в функцию Добавлено: 17.12.03 12:48  

Автор вопроса:  morozov

Господа !

подскажите как передать в функцию массив элементов?

на форме есть text1(0) 1 шт

я хочу передать его в функцию, которая

используя метод LOAD сделает много элементов TEXT(i) сколько мне надо.

dim a as textbox

set a = text(0)

function (byref textcontrol() as TextBox)

dim number%

number% = 5

for i =1 to number%

Load Text1(I)

next i

end function

такая конструкция не работает.

Ответить

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

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



ICQ: 8440085 

Вопросов: 15
Ответов: 117
  Web-сайт: malyav.narod.ru
 Профиль | | #1 		Добавлено: 18.12.03 07:28

Private Sub Command1_Click()
addcontrols Text1
End Sub

Private Function addcontrols(t As Object)
Dim i As Integer

For i = 1 To 5
    Load t(i)
    t(i).Visible = True
    t(i).Top = 600 * i
Next
End Function

это работает.

Ответить

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



Вопросов: 10
Ответов: 7
  Профиль | | #2 Добавлено: 18.12.03 12:24

Большое Спасибо.

за отличную подсказку.

Ответить

Страница: 1 |

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



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