hola amigos, tengo el siguiente problema y espero que me puedan ayudar, mira tengo estas direcciones:
turincon.com.pe
peru.com
sublime.us
la gran pregunta es como hago para quitar el resto de letras a partir del punto y que solo me mueste lo nombres de esta manera:
turincon
peru
sublime
espero que me pudan ayudar

Yo no se VB, pero se VBA, coje la cadena, hazle un left(cadena,limite) y como límite cojes el resultado de una función que devuelva un int que recorra la cadena caracter a caracter a través de un bucle y compare el caracter con "." y si no es igual que le sume 1 a un contador iniciado a 0 en el método hasta que sea igual, que terminará el bucle y devuelves el contador que se habrá quedado con la posición del punto.

El resultado lo mismo tienes que sumarle o restarle uno dependiendo si la cadena empieza a contar en 0 o en 1 o si el left llega hasta el contador incluído o no. Eso ya lo depuras tú.

Advertencia - mientras estabas escribiendo, una nueva respuesta fue publicada. Probablemente desees revisar tu mensaje.

mmm...

MsgBox Split("turincon.com.pe", ".")(0)

Nada, saludos.