<div dir="ltr"><div dir="ltr"><br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Il giorno mer 11 set 2019 alle ore 00:56 Benoît Minisini <<a href="mailto:g4mba5@gmail.com">g4mba5@gmail.com</a>> ha scritto:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Le 11/09/2019 à 00:41, Tobias Boege a écrit :<br>
> And I have a question too: Since when can you use a string like an array?<br>
<br>
Since 3.12.<br>
<br>
> Is that documented? At least it seems like it is a read-only array, which<br>
> complicates the solution to the second issue...<br>
<br>
It's only documented in the Mid$() and Len() wiki pages. And only <br>
reading the array is allowed.<br>
<br>
Regards,<br>
<br>
-- <br>
Benoît Minisini<br></blockquote><div><br></div><div>Tobias & Benoit,<br>thank you very much.</div><div><br></div><div>Damn, and to think that I translated wiki pages not long time ago.<br>I have a particular feature, I don't even understand what I write, sigh!<br><br>What do you think about these solutions (obviously the second solution is not mine :-P)?<br><br>Private Function ProperCase(value As String) As String<br><br>  Dim ss As String[] = Split(value, " ")<br><br>  value = ""<br>  For Each s As String In ss<br>    value &= String.UCaseFirst(s) & " "<br>  Next<br>  Return RTrim(value)<br><br>End<br><br>Private Function ProperCase(value As String) As String<br><br>  Dim bb As Byte[]<br><br>  bb = Byte[].FromString(value)<br>  For i As Integer = 0 To bb.Max - 1<br>    If bb[i + 1] \ bb[i] = 3 Then bb[i + 1] = bb[i + 1] - 32<br>  Next<br>  Return bb.ToString(0, bb.Count)<br><br>End<br><br>Benoit, how about adding a new string function?<br><br>Regards<br>Gianluigi <br></div></div></div>