
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
18.04.2008, 17:36
|
|||
|---|---|---|---|
|
|||
динамический массив |
|||
|
#18+
Всем привет. Не могу разобраться с динамическим массивом (( Определяю массив Option Base 0 Dim MyArray() As String Dim i As Integer Sub first i=0 Erase MyArray sub second() end sub Sub second ... Получаю некую переменную MyText ,которую хочу запиxнуть в массив MyArray(i) = MyText ' - тут ошибка end sub На вставку ругается.. Что не так? Если массив определяю явно MyArray(500) - все работает. Помогите советом. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2008, 17:59
|
|||
|---|---|---|---|
|
|||
динамический массив |
|||
|
#18+
на каждой вставке нужно редим с явным указанием размера делать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2008, 18:07
|
|||
|---|---|---|---|
динамический массив |
|||
|
#18+
Если известно заранее сколько нужно вставить, то можно так Redim Preserve MyArray(ubound(MyArray) + n) но первый раз массив надо инициализировать Redim MyArray(0) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2008, 18:14
|
|||
|---|---|---|---|
|
|||
динамический массив |
|||
|
#18+
жаль.. я думал, что можно без этого как-то сделать.. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2008, 18:18
|
|||
|---|---|---|---|
динамический массив |
|||
|
#18+
u4eni4okжаль.. я думал, что можно без этого как-то сделать..Можно, если использовать коллекцию ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.04.2008, 18:39
|
|||
|---|---|---|---|
|
|||
динамический массив |
|||
|
#18+
ага.. спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=60&mobile=1&tid=2162391]: |
0ms |
get settings: |
11ms |
get forum list: |
19ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
50ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
55ms |
get tp. blocked users: |
2ms |
| others: | 246ms |
| total: | 395ms |

| 0 / 0 |
