Pessoal, eu gostaria de saber qual a sintaxe daquela função que separa um string.

Por exempo:

Variavel texto:

Ai ele retorna assim:

texto(0) = Fórum

texto(1) = VBweb

 

e assim vai..........

 

Obrigado

Olá

 

vc deve usar INSTR para ir localizando as posições do '@' e depois usar MID$ para poder pegar os techos que deseja indicados pela INSTR

 

use elas dentro de um FOR NEXT tipo este

 

for i= 1 to len(texto)

    x=instr(i,texto,"@")

    texto1=mid$(texto,....

 

por aí vai

Pc, muito obrigado pela ajuda mas eu encontrei o que precisava.

Estou usando a função Split:

 

Dim texto() As String
texto = Split(txt1.Text, "@")
txt1.Text = texto(0) & " " & texto(1)

 

Muito obrigado pela atenção