英語だけ全角から半角変換したい

[chokota0326]

strName = “ＢＣ１カンパニー”
という文字列を、"BC1カンパニー"のように、英数字だけ半角にしたいです。

StrConv(strName, VbStrConv.Narrow, &H411)

を行うと、"BC1ｶﾝﾊﾟﾆｰ"のように、カタカナも半角になってしまいます。。。

アドバイスお願いします。

[Yoichi]

こんにちは

とりいそぎ２案ほど

正規表現置換

System.Text.RegularExpressions.Regex.Replace(strName,"[Ａ-Ｚａ-ｚ０-９]+",Function(m) StrConv(m.Value, VbStrConv.Narrow, &H411))

Unicode正規化

strName.Normalize(System.Text.NormalizationForm.FormKC)

こちらは他の文字に影響を与える可能性があるかも

[chokota0326]

ありがとうございます！
1つ目にいただいた案で無事実装できました！