[VB6] iniziali maiuscole

[cl.venturini]

Ciao a tutti,
per caso sapete dirmi se esiste una funzione per convertire tutte le iniziali di una stringa in maiuscole??? Ad es: "ciao mondo" deve diventare "Ciao Mondo"

Se non c'è una funzione specifica come potrei fare???

grazie a tutti

[Sypher]

Tiè:

stringa = "ciao come va io sono Sypher"
Dim arrParole() As String
    
arrParole = Split(stringa)
    
For i = 0 To UBound(arrParole)
   tuaStringa = tuaStringa & UCase(Left(arrParole(i), 1)) & Right(arrParole(i), Len(arrParole(i)) - 1) & " "
Next
tuaStringa = Left(tuaStringa, Len(tuaStringa) - 1)

[Meldon]

Scusa potresti inviarmi una mail con un esempio commentato?? Mi interessa molto.

Grazie in anicipo, ciao