Динамический массив

[Чудик]

Не понимаю как работать с динамическим массивом - не получается!
В стандартном модуле объявляю Public x(), а в модуле формы пишу
For i=1 to 3
y=y+1
x(i)=y
Next i
Данный код - как типичный пример. При первом же обращении в цикле к объявленному массиву выскакивает ошибка Subscript out of range. Достаточно объявить Public x(2) и все чик-чирик. Вывод - что-то делаю не так.
Думаю, что это не сложная загадка для большинства присутствующих. Глубоко надеюсь, что помощь будет. Как-то эмоционально давит нерациональное использование памяти на компьютере.

[VKar]

Потому что если при объявлении массива не указать кол-во элементов, то при записывании в массив каких-либо данных ты как-бы записываешь в никуда. Для твоего примера, если объявлять массив как Public x() нужно переобъявить массив процедурой ReDim:
Public x()
ReDim x(1 to 3)
For i=1 to 3
y=y+1
x(i)=y
Next i
т.е. в скобках ReDim () указываешь нужный размер массива.
НО нужно учесть, что при вызове процедуры ReDim () весь массив обнуляется!
Чтоб такого не происходило, нужно писать:ReDim preserve ()

[Чудик]

А не получится ли, что при помощи ReDim я из глобального объявления массива перейду к локальному? Или я опять чего-то непонимаю? Или я не правильно рассматриваю функиональное назначение ReDim?

[VKar]

Полностью процедура выглядит так:
ReDim [Preserve] varname(subscripts) [As type]
где
[As type]-необязательный параметр, указывающий, в какой тип данных нужно изменить массив, если его не указать то тип данных в массиве не изменится.А насчёт глобальности, не знаю, не пробовал...

[Чудик]

Так а что о видимости массива - он останется глобальным? Это важно!

[Vitaly1]

Для того, что бы сделать динамический массив глобальным, его объявляют в главной области модуля оператором Dim, а переобъявляют его размерность в процедуре, оператором Redim. Можно объявить в главной области модуля динамический массив оператором Public, а переобъявлять его размерность тем же Redim. Public динамический массив доступен для всех модулей проекта.

[Чудик]

Получается, что при переобъявлении ReDim не влияет на видимость массива. Думаю, что понятно. Жаль, что попробовать сразу не могу. Нахожусь на работе. Теперь до дома... Спасибо за инфо!

[ToT]

ReDim просто меняет размер массива и никаким боком не влияет на его видимость.

[ANDLL]

Осталось лишь добваить, что Public - это публичная(ой, простите...) область видимости. Для объфвления глобальных переменных используйте Global.

[tyomitch]

афаик в VB5+ Public и Global - синонимы, различия были где-то в VB3, а то и раньше.

[Ruslan Demidow]

афаик в VB5+ Public и Global - синонимы, различия были где-то в VB3, а то и раньше.

Т.е. если я напишу Public или Global в модуле - то принципиальной разницы никакой не будет? Или всё же какая-то разница есть?

[tyomitch]

Не только принципиальной, имхо вообще никакой не будет.

[Чудик]

Подтверждаю, что выше сказанное правда - проверено!!!

[ANDLL]

Да... А я то думал, что global это что-то типа extern. Я разочировался... Ну да ладно...

[Чудик]

А что такое extern, извините не в курсе?

[ANDLL]

Гм. да так. в C++ переменные объявленные с модификатором(то бишь словом) extern видны и в других файлах. То бишь объявляешь в каком-то файле переменную, а потом в других файлах объявляешь ее как extern и она становиться как-бы глобальной. Я думал в VB также, ан нет.

[alibek]

Да нет, разницы между Global и Public я тоже не замечал. Просто в модулях я всегда пишу именно Global, а не Public, мне так приятнее

[Vitaly1]

Господа Public и Private - это начало объявления полей модуля, или процедур модуля (функций и подпрограмм) Global оператор перешел от более ранних версий байсик, это "рудимент" для объявления глобальных переменных. Но теперь Global и Public синонимы, ими можно объявлять глобальное поле модуля. но попробуйте вызвать справку ctrl+F1 на слово Global то вам выдадут справку по Public.

[alibek]

Vitaly1, этот рудимент лично мне нравиться. На мой взгляд, читабельность он повышает.

[Scuder]

Прошу прощения за ламерский вопрос.. Но чем отличается Private от Dim?

[tyomitch]

В module scope - ничем.
В процедуре - тем, что Private недопустим, а Dim допустим.