guillemets indésirables

Question

il semblerait (je dis ça parceque je débute) que VB me renvoie des valeurs avec des guillemets par exemple un chemin d'accès ressemblera a "c:	emp" et comme je souhaite passer ce chemin en parametre ça ne marche pas...
Connaisez-vous une solution ?
Merci
 :sad)  :sad)

cs_rene38 · Answer

Public Function SansGuillemets(ByVal AvecGuillemets As String)
AvecGuillemets = Trim$(AvecGuillemets )
If Mid$(AvecGuillemets , 1, 1) = chr(34) Then        If Right$(AvecGuillemets , 1) chr(34) Then AvecGuillemets Mid$(AvecGuillemets, 2, Len(AvecGuillemets) - 2)
        End If
    End If
    SansGuillemets = AvecGuillemets 
End Function

Et tu passes comme paramètre
SansGuillemets(Chemin)

Guillemets indésirables

1 réponse