VB.NET,C#で半角カナのみ全角カナに変換する

http://ooltcloud.sakura.ne.jp/blog/201404/article_18005031.html
Regex.Replaceメソッドで半角カナのコード範囲の文字列をマッチさせ、第二引数にラムダ式を渡してStrConvで全角変換するという冴えたやり方。

''' <summary>
''' 半角カナを全角カナに変換
''' </summary>
Public Shared Function ToZenkakuKana(ByVal in_strData As String) As String

    ' 半角カナのコード範囲
    Const HANKAKU_KANA_PTTERN As String = "[\uFF61-\uFF9F]+"

    Return Regex.Replace(in_strData, HANKAKU_KANA_PTTERN,
                         Function(in_match As Match) As String
                             ' 切り出した半角カナ部分を全角カナに変換
                             Return StrConv(in_match.ToString, VbStrConv.Wide)
                         End Function)

End Function