mettiamocene un'altra:

codice:
     Public Shared Function Capitalize(ByVal stringaDaCapitalizzare As String) As String
        Dim arrStr() As String = stringaDaCapitalizzare.Trim.Split(" ")
        Dim primoCarattere As Char
        Dim parteRimanenteStringa As String

        For indice As Integer = 0 To UBound(arrStr)
            If Char.IsLower(arrStr(indice).Chars(0)) And Len(arrStr(indice)) > 1 Then
                primoCarattere = Char.ToUpper(arrStr(indice).Chars(0))
                parteRimanenteStringa = Right(arrStr(indice), arrStr(indice).ToString.Length - 1)
                arrStr(indice) = primoCarattere + parteRimanenteStringa
            End If
        Next
        Dim StringaCapitalizzata = String.Join(" ", arrStr)
        Return StringaCapitalizzata
    End Function
cmq credo che la soluzione dei CSS sia abbastanza efficace