Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объявление массивов / 9 сообщений из 9, страница 1 из 1
15.06.2004, 10:56
    #32561125
raur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
Привет всем
Кто-нить знает как объявить массив типом паблик?
...
Рейтинг: 0 / 0
15.06.2004, 11:02
    #32561140
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
А что не получается?
Пишешь вместо Dim слово Public?
...
Рейтинг: 0 / 0
15.06.2004, 11:08
    #32561149
raur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
пишет ошибку
Constants, fixed-length strings, arrays, user-defined types, and Declare statements not allowed as Public members of an object module
...
Рейтинг: 0 / 0
15.06.2004, 11:10
    #32561151
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
объявлять надо в модуле а не в форме
...
Рейтинг: 0 / 0
15.06.2004, 11:10
    #32561153
raur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
You declared a Public array in an object module.
Although a procedure can't return an array, it can return a Variant that contains an array. To simulate a Public array in a class module, use a set of Property procedures that accept and return a Variant containing an array.

советуют через property, только я не совсем понимаю как юзать это самое проперти, подскажите плиз
...
Рейтинг: 0 / 0
15.06.2004, 11:12
    #32561162
raur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
точно в модуле! спасибо
а вопрос на счет проперти остается...
...
Рейтинг: 0 / 0
15.06.2004, 11:15
    #32561166
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
В классе, действительно, нельзя!

Обходи это через задание свойств (property)

class
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim arr( 1  To  10 ) As Long

Public Property Let MyArr(ByVal index As Integer, ByVal p As Long)
    arr(index) = p
End Property

Public Property Get MyArr(ByVal index As Integer) As Long
    MyArr = arr(index)
End Property

form
Код: plaintext
1.
2.
3.
4.
Private Sub Form_Load()
Dim a As New Class1
    a.MyArr( 5 ) =  10 
    MsgBox a.MyArr( 5 )
End Sub
...
Рейтинг: 0 / 0
15.06.2004, 11:21
    #32561181
raur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
спасибо
а где можно подробно почитать про это проперти?
...
Рейтинг: 0 / 0
15.06.2004, 11:26
    #32561195
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объявление массивов
raurспасибо
а где можно подробно почитать про это проперти?

MSDN
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объявление массивов / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]