文字列長を正確に取得する

■string.Lengthで文字列長を取得はできるが、一部の特殊な文字などは

　正確に取得することができない。

    ex)

　　𩸽:ほっけは一文字だが、Lengthなど2文字になってしまう。

　正確に取得するには、StringInfoを使用する。

　Dim si As New StringInfo(str)
　Return si.LengthInTextElements