VBNet - Форум - Масив

Вопрос: Масив Добавлено: 23.07.09 13:22

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

Есть проблема

Есть управление пользователя в который я передаю масив

имя компонента Pokoz1 код компонента:

Dim Pokoz(36) As String

Public Property Let PokozViev(ByRef Pokoz() As String)
MsgBox Pokoz(1)
PropertyChanged "PokozViev"
End Property

На форму накинул компонент, кнопку Command1
код в форме:

Private Sub Command1_Click()
Dim Arr(36) As String
Arr(1) = "123"
call Pokoz1.PokozViev (Arr())
End Sub

Подскажите пожалуста что неправильно делаю, как правильно при нажатии на кнопку передать содержимое массива Arr() в управление пользователя.

Как пример: Чтобы MsgBox выдал 123 на экран при нажатии на Command1
Ответить

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

Номер ответа: 1 Автор ответа: AWP ICQ: 345685652 Вопросов: 96 Ответов: 1212	Web-сайт: xawp.narod.ru Профиль \| Цитата \| #1	Добавлено: 23.07.09 22:48
	Чтобы MsgBox выдал 123 на экран при нажатии на Command1 [source MsgBox Arr(1) [/source] А что за компонент Pokoz1, думаю, мало кто знает Ответить

Номер ответа: 2 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #2	Добавлено: 24.07.09 08:11
	Эт компонент пользователя, весь внутренний код предоставлен, и в нём код тока про передачу данных. массива где собственно и ошибка, для тех кто работал с управлением пользователя с их написанием думаю подскажет чё Ответить

Номер ответа: 3 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #3	Добавлено: 24.07.09 08:14
	Чтобы MsgBox выдал 123 на экран при нажатии на Command1 [source MsgBox Arr(1) [/source] данные надо вывести не из Arr массива а из масива который передаётся управлению пользователя, а у меня проблемма с передачей(( Ответить

Номер ответа: 4 Автор ответа: Skywalker ICQ: 300-70-6пятьЪ Вопросов: 62 Ответов: 545	Web-сайт: iSkywalker.ru Профиль \| Цитата \| #4	Добавлено: 24.07.09 08:30
	да все норм, так и нада Ответить

Номер ответа: 5 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #5	Добавлено: 25.07.09 09:50
	так ошибку выдаёт(( Ответить

Номер ответа: 6 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #6	Добавлено: 26.07.09 15:34
	Есть идеи у кого в чём дело? Ответить

Номер ответа: 7 Автор ответа: VβÐUηìt Вопросов: 246 Ответов: 3333	Web-сайт: смекаешь.рф Профиль \| Цитата \| #7	Добавлено: 26.07.09 16:46
	Попробуй написать васю так: Dim Pokoz(36) As String Public Property Let PokozViev(Pokoz) MsgBox Pokoz(1) PropertyChanged "PokozViev" End Property Ответить

Номер ответа: 8 Автор ответа: VβÐUηìt Вопросов: 246 Ответов: 3333	Web-сайт: смекаешь.рф Профиль \| Цитата \| #8	Добавлено: 26.07.09 16:48
	Ё O_O ты чо написал?! Public Property Let Этош обявление свойства, а ты как функцию вызываешь! Так же нельзя! Почитай в интернете что такое Property в VB6, и как правильно его писать. Ответить

Номер ответа: 9 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #9	Добавлено: 26.07.09 17:53
	Мне надо написать компанент (управление пользователя) в который надо чтобы передавался массив! А не в функцию!!! Ответить

Номер ответа: 10 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #10	Добавлено: 26.07.09 17:55
	а в управлении пользователя, свойство описывается так Public Property Let PokozViev() PropertyChanged "PokozViev" ' имя свойства End Property Ответить

Номер ответа: 11 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #11	Добавлено: 26.07.09 18:01
	Обсраться заработало во как надо было в компаненте: Dim Pokoz(36) As String Public Property Let PokozViev(Pokoz) MsgBox Pokoz(1) PropertyChanged "PokozViev" End Property в кнопке: Dim Arr(36) As String Arr(1) = "123" Pokoz1.PokozViev = Arr() Ответить

Номер ответа: 12 Автор ответа: VerhoLom Вопросов: 20 Ответов: 285	Профиль \| Цитата \| #12	Добавлено: 28.07.09 17:00
	Не обязательно! Работает и так: Sub m(ByRef aa() As String) MsgBox aa(1) End Sub 'ее вызывать! Sub ee() Dim a(36) As String a(1) = "123" m a End Sub Ответить

Номер ответа: 13 Автор ответа: Stars Вопросов: 41 Ответов: 239	Профиль \| Цитата \| #13	Добавлено: 02.08.09 18:20
	Так у тя свойства компонента не заданы, у тя пример приведён только для работы во внешних процедурах, а мне именно надо было данные в компанент передать, а если ты процедуру не объявиш как Public Property Let, то у тя свойство в компоненте попросту не будет такого которого ты делаеш. Так что твой пример полностью не рабочий. Ответить

Страница: 1 |