Списки: Add_To_List()
Добавление элемента в текстовый список, если его в нем еще нет. Использует функцию Find_In_List()
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Добавление значения STRING в список LIST (разделитель - запятые), если там его еще нет.
' Возвращает обновлённый список.
FUNC Add_To_List(atl_list,atl_string)
if atl_list == ""
result = atl_string
return
end if
if Find_In_List(atl_list,atl_string) > -1
result = atl_list
else
result = atl_list & "," & atl_string
end if
END FUNC
См. также Пропущенные значения в списках