Função InStr

Retorna a posição de uma string dentro de outra.

A função Instr retorna a posição na qual a cadeia correspondente foi encontrada. Se a cadeia de caracteres não tiver sido encontrada, a função retornará 0.

Sintaxe:


InStr ([Start As Long,] Text1 As String, Text2 As String[, Compare])

Valor de retorno:

Integer

Parâmetros:

Start: Expressão numérica que marca a posição em uma string onde deve ter início a pesquisa na substring especificada. Se você omitir esse parâmetro, a pesquisa será iniciada no primeiro caractere da string. O valor máximo permitido é 65535.

Text1: a expressão da cadeia de caracteres a pesquisar.

Text2: a expressão da cadeia de caracteres a procurar.

Compare:Expressão numérica opcional que define o tipo de comparação. O valor desse parâmetro pode ser 0 ou 1. O valor padrão 1 especifica uma comparação de texto que não faz distinção entre maiúsculas e minúsculas. O valor 0 especifica uma comparação binária que faz distinção entre maiúsculas e minúsculas.

Para evitar um erro em tempo de execução, não defina o parâmetro Compare quando o primeiro parâmetro de retorno tiver sido omitido.

Códigos de erro:

5 Chamada de procedimento inválida

Exemplo:


Sub ExamplePosition
Dim sInput As String
Dim iPos As Integer
    sInput = "Office"
    iPos = Instr(sInput,"c")
    Print iPos
End Sub

♥ Doe para nosso projeto! ♥