Visual Basic - Encontrar caracter

Hola a tod@s,
Hay alguna función predefinida en VB6 que devuelva el índice de la primera ocurrencia de un caracter en una cadena?

Muchas gracias

Utiliza la función InStr.

Espero te sirva. Saludos Pola

Ejemplo de la función InStr

En este ejemplo se utiliza la función InStr para devolver la posición de la primera ocurrencia de una cadena en otra.

Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP" ' Cadena en la que se busca.
SearchChar = "P" ' Se busca "P".
' Una comparación textual que comienza en la posición 4. Devuelve 6.
MyPos = Instr(4, SearchString, SearchChar, 1)
' Una comparación binaria que comienza en la posición 1. Devuelve 9.
MyPos = Instr(1, SearchString, SearchChar, 0)
' La comparación es binaria por configuración predeterminada (si se omite el último argumento).
MyPos = Instr(SearchString, SearchChar) ' Devuelve 9.
MyPos = Instr(1, SearchString, "W") ' Devuelve 0.