IBM Lotus Symphony
|
Renvoie la position d'une chaîne de caractères dans une autre chaîne de caractères.
La fonction Instr renvoie la position où la correspondance a été trouvée. Si la chaîne de caractères n'a pas été trouvée, la fonction renvoie 0.
InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])
Nombre entier
Start : expression numérique repérant la position, dans une chaîne de caractères, marquant le début de la recherche de la sous-chaîne spécifiée. Si vous omettez ce paramètre, la recherche commence au premier caractère de la chaîne. La valeur maximale autorisée est 65 535.
Text1 : expression de type chaîne de caractères dans laquelle la recherche est effectuée.
Text2 : expression de type chaîne de caractères à rechercher.
Compare : expression numérique facultative définissant le type de comparaison. La valeur de ce paramètre peut être 0 ou 1. La valeur par défaut 1 spécifie une comparaison de texte sans respect de la casse. La valeur 0 indique une comparaison binaire sensible à la casse.
Pour éviter une erreur d'exécution, ne définissez pas le paramètre Compare si le premier paramètre de retour est omis.
Sub ExamplePosition
Dim sInput As String
Dim iPos as Integer
sInput = "Lotus Symphony"
iPos = Instr(sInput,"c")
print iPos
end sub