tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
半角カタカナだけを全角カタカナに変換する(VB.NET) ( No.0 )  [親スレッドへ]
日時: 2007/09/11 15:43
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[文字列処理][][]                                                    *
* キーワード:半角カナ,全角カナ,,,,                                              *
***********************************************************************************

元質問:カタカタだけ全角に変換したい - こうめ  2007/01/24-10:01 No.4893

すべての文字列を英数字および記号(/.:!#&・・・等)は半角でカタカナは全角に
統一したいのですが、良い方法はないでしょうか?

-----------------------------------------------------------------------------------
Re^5: カタカタだけ全角に変換し.. - YAS  2007/02/12-12:25 No.4976
-----------------------------------------------------------------------------------

正規表現を使うのであったら,次のようなものはどうでしょう?

    Public Function ConvertKana(ByVal Src As String) As String
        Return Regex.Replace(Src, "[\uFF61-\uFF9F]+", _
                 New MatchEvaluator(AddressOf RegexMatchEvaluator))
    End Function

    Private Function RegexMatchEvaluator(ByVal M As Match) As String
        Return Strings.StrConv(M.Value, VbStrConv.Wide, 0)
    End Function



 [スレッド一覧へ] [親スレッドへ]