vb.net IVSの漢字を１文字切り出す方法

質問

vb.net IVSの漢字を１文字切り出す方法

花という漢字の異体字がセットされた文字列があるとします。
U+82B1 + U+E0103の草冠が＋＋の花の異体字です。

Dim String1 as String = ChrW(&H82B1) & ChrW(&HDB40) & ChrW("&HDD03")

この文字列String1 から頭の”１文字”を切り出す方法を教えて下さい。

mid(String1 ,1,1) とすると、異体字の花ではなく、通常の花が出ます。
１文字ではなく、文字の本体部分だけ切り出してしまい、”１文字”を切り出す事ができません。

回答No.1

Yune-Kichi

IVSに限りませんが，.NET上で「一文字」単位で処理する場合には，StringInfoクラスが使えます。
http://msdn.microsoft.com/ja-jp/library/System.Globalization.StringInfo.aspx

で，C#のコードになりますが，IVSまわりで正しく動作することを確認した報告があります。
http://social.msdn.microsoft.com/Forums/ja-JP/68d83756-bba6-48ad-92ef-63ecb230b568/unicode-ivd?forum=netfxgeneralja