Arraygetindex

Тема в разделе "Lotus - Программирование", создана пользователем Gor, 7 фев 2007.

  1. Gor

    Gor Well-Known Member

    Регистрация:
    7 июн 2005
    Сообщения:
    517
    Симпатии:
    2
    Всем доброго время суток...
    есть вопрос...
    Мне необходимо проверить является ли значение элементом массива
    или нет... если является то действие Else действие
    использую функцию Arraygetindex
    вот код
    Код (Text):
    For g = 1 To p1
    p1 = Cint(p1)
    v = Round(Rnd*p1,0)
    If v =0 Then v= v+1

    Dim n As Variant

    n = Arraygetindex(roman,v)             
    If n = Null Then
    roman(g) = v
    Else
    g = g - 1
    End If
    Next
    Вопрос:
    почему после сравнения n = Null всё время следующее действие сваливается
    на Else (т.е. не идёт продолжение на Then) если значение переменной n при проходе в дебаггере действительно равно Null???
     
  2. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Для проверки надо использовать функцию IsNull.

    А значение Null можно только присвоить.
     
  3. Gor

    Gor Well-Known Member

    Регистрация:
    7 июн 2005
    Сообщения:
    517
    Симпатии:
    2
    действительно....=) работает=)

    If Isnull(n) Then
    roman(g) = v
    Else
    g = g - 1
    End If

    невнимательность... спасиб!
     

Поделиться этой страницей