Chercher une chaîns dans une liste de chaînes

J'ai ajouté une fonction à ma Dll Strings.dll. Elle permet de chercher une sous-chaîne dans un string composé de sous-chaînes séparées par un caractère séparateur, et retourne son index (commençant par 0 pour la première sous-chaîne) ou -1 si non trouvé.

Appel:
index% = dll_call3("ItemIndexInString",adr(string$),adr(sep$),adr(item$))

sep$ est une chaîne de 1 caractère contenant le caractère de séparation.