[ツリー表示へ] [ワード検索] [Home]
タイトル ： カタカタだけ全角に変換したい 投稿日 ： 2007/01/24(Wed) 10:01 投稿者 ： こうめ
| いつも参考にさせていただいております。 ありがとうございます。 すべての文字列を英数字および記号（/.:!#&・・・等)は半角でカタカナは全角に 統一したいのですが、良い方法はないでしょうか？ 今思っているのが、 まずすべてを半角に変換します。 その後、半角カタカナを全角に置き換えようとしています。 strMoji = StrConv(strMoji, VbStrConv.Narrow) '半角カタカナが混じっていないかチェック If Regex.IsMatch(strMoji, "[\uFF61-\uFF9F]") Then '半角カタカナを全角に変換 strMoji = Replace(strMoji, "ア", "ア") strMoji = Replace(strMoji, "イ", "イ") strMoji = Replace(strMoji, "ウ", "ウ") strMoji = Replace(strMoji, "エ", "エ") strMoji = Replace(strMoji, "オ", "オ") ： End If 他にいい方法があれば、教えてください。 よろしくお願いいたします。 |
をクリックするとツリー全体を一括表示します） - カタカタだけ全角に変換したい - こうめ 01/24-10:01No.4893