IBM Lotus Symphony
|
Devolve a posição de uma cadeia dentro de uma outra cadeia.
A função Instr devolve a posição na qual foi encontrada a correspondência. Se a cadeia não foi encontrada, a função devolve 0.
InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])
Integer
Start: Uma expressão numérica que assinala a posição numa cadeia onde será iniciada a procura da sub-cadeia especificada. Se omitir este parâmetro, a procura é iniciada no primeiro carácter da cadeia. O valor máximo permitido é de 65535.
Text1: A expressão em caracteres que pretende procurar.
Text2: A expressão em caracteres que pretende procurar.
Compare: Expressão numérica opcional que define o tipo de comparação. O valor deste parâmetro pode ser 0 ou 1. O valor predefinido de 1 especifica uma comparação de texto que não é sensível a maiúsculas ou minúsculas. O valor de 0 especifica uma comparação binária sensível a maiúsculas e minúsculas.
Para evitar um erro de tempo de execução, não defina o parâmetro Comparar se o primeiro parâmetro de retorno estiver omisso.
Sub ExamplePosition
Dim sInput As String
Dim iPos as Integer
sInput = "Lotus® Symphony™"
iPos = Instr(sInput,"c")
print iPos
end sub