ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Dim a1() vs Dim a2
2 сообщений из 52, страница 3 из 3
  3  все
Dim a1() vs Dim a2
    #39023847
Иван FXS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Иван FXS
Участник
hclubmk100 рублей убытку :

-- спасибо, понял, преклоняюсь.
...
Рейтинг: 0 / 0
05.08.2015, 19:39
| Ответить | Цитировать | Написать  
Dim a1() vs Dim a2
    #39023853
Eolt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eolt
Участник
Иван FXSEolt,

Код: vbnet
1.
ElseIf (UBound(vArr) = -1) Then


- то есть массивы

Код: vbnet
1.
dim a(-222 to -1)


в природе не существуют?

ну добавь проверку на отрицательные массивы, в чем проблема

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Private Function ArrayInit(vArr) As Boolean
   On Error Resume Next
        If Not IsArray(vArr) Then
            GoTo Handler
        ElseIf IsError(UBound(vArr)) Then
            GoTo Handler
        ElseIf (UBound(vArr) - LBound(vArr) + 1 < 0) Then
            GoTo Handler
        End If
        ArrayInit = True
Handler:
    On Error GoTo 0
End Function



хотя отрицательные массивы имхо какая-то непонятная наркомания..
...
Рейтинг: 0 / 0
05.08.2015, 20:07
| Ответить | Цитировать | Написать  
2 сообщений из 52, страница 3 из 3
  3  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Dim a1() vs Dim a2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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