Texto entre aspas

[danyort]

Boa tarde galerinha!!

Digamos que eu tenha uma variável A e essa variável recebe o texto: Amanhã é "tarde".

Eu quero fazer o seguinte, pegar só o texto que está entre aspas, no caso "tarde".

Só que esse texto será variável, ou seja, toda hora vai estar mudando. E às vezes, vai acontecer de tr mais de uma palavra entre aspas, e quero pegar todas essas palavras.

Como eu faço isso??

Editado Março 13, 2008 por danyort

[webdeveloper]

Mais ou menos isso:

strTexto = "Amanha e ""tarde""" 'String contendo o texto
    primPos = InStr(strTexto, """") + 1 'Pega a primeira posicao da aspa
    preTexto = Mid(strTexto, primPos, Len(strTexto)) 'Prepara o texto para pegar a segunda posicao da aspa
    segPos = InStr(preTexto, """") - 1 'Pega a segunda posicao da aspa
    Response.Write = Mid(strTexto, primPos, segPos) 'Mostra o texto entre aspas