|
Действия ...
|
02.10.2003, 14:33
|
|||
|---|---|---|---|
|
|||
еще один глупый вопрос |
|||
|
|
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
02.10.2003, 14:32
|
|||
|---|---|---|---|
|
|||
еще один глупый вопрос |
|||
|
#18+
Dim myArray(1) As Integer myArray(1) = 0 i = 0 If Val(Left(T3![UST], 3)) = gos Then i = i + 1 ReDim Preserve myArray(i) myArray(i) = T3![TEL] End If Ругается, что ошибка компиляции на строчку ReDim Preserve myArray(i) Array already dimensioned Что не так? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
02.10.2003, 14:33
|
|||
|---|---|---|---|
|
|||
еще один глупый вопрос |
|||
|
#18+
Dim myArray() As Integer ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
02.10.2003, 14:34
|
|||
|---|---|---|---|
еще один глупый вопрос |
|||
|
#18+
Dim myArray() As Integer myArray(1) = 0 i = 0 If Val(Left(T3![UST], 3)) = gos Then i = i + 1 ReDim Preserve myArray(i) myArray(i) = T3![TEL] End If ReDim Preserve myArray(i) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
02.10.2003, 14:34
|
|||
|---|---|---|---|
|
|||
еще один глупый вопрос |
|||
|
#18+
А перед myArray(1) = 0 надо еще один ReDim. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=45&mobile=1&tid=1679094]: |
0ms |
get settings: |
6ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
37ms |
get topic data: |
6ms |
get forum data: |
2ms |
get page messages: |
23ms |
get tp. blocked users: |
1ms |
| others: | 232ms |
| total: | 320ms |
| 0 / 0 |
