funzione vb6 per sostituzione

[Rosy23]

Sapete qual'è una funzione Di vb6 per sostituire all'interno di una stringa alfanumerica un carattere con un altro carattere???

Grazie.

[ink--]

prova con
Replace(espressione, cerca, sostituiscicon[, inizio[, conteggio[, confronto]]])

[Rosy23]

grazie funziona perfettamente!

[Rosy23]

E te ne sparo una grossa....
Si potrebbe sapere le posizioni all'interno di una stringa di una sottostringa particolare senza fare nessuna procedura?

Mi spiego meglio :
Stringa1 = "ciao mamma come va?"
Vorrei avere una specie di vettore con all'interno tutte le posizioni della a nelle stringa1
quindi soluzione finale vet(x) contiene 3,7,10,18
cioè le posizioni della lettera 'a' all'interno della stringa1 ...

E' possibile con una istruzione o devo calcolarmele?

Grazie spero di essere stata chiara...

[Sypher]

qualcosa del genere?

stringa1 = "ciao mamma come va?"

Dim arr()
j = 0
For i = 1 To Len(stringa1)
    lettera = Mid(stringa1, i, 1)
    If (lettera = "a") Then
        ReDim Preserve arr(j)
        arr(j) = i
        j = j + 1
    End If
Next

[Jupy64]

ciao, se vuoi cercare non solo un carattere ma anche delle parole, allora prova questa procedura:

 
Dim vettPos() As Integer

Private Sub PosizioniStringa(strDaCercare As String, strInCuiCercare As String)
  Dim i As Integer
  Dim posStr As Integer
  i = 0
  ReDim vettPos(i)
  posStr = 1
  Do Until posStr = 0
    posStr = InStr(posStr, strInCuiCercare, strDaCercare)
    If posStr > 0 Then
      i = i + 1
      ReDim Preserve vettPos(i)
      vettPos(i) = posStr
      posStr = posStr + 1
    End If
  Loop
End Sub

alla fine il vettore "vettPos" conterra tutte le posizioni iniziali della parola cercata, fai attenzione, cosi com'è la procedura, quando vai a scorrere il vettore, l'indice deve partire da 1, altrimenti devi modificare la procedura...

[Rosy23]

grazias molto a tutti e due