« JIS非漢字、第一水準、第二水準の判別方法 | トップページ | 「Windows 画像と Fax ビューア」でファイルを表示または印刷するショートカット »

2008年10月 9日 (木)

全角ひらがな、全角カタカナの判別方法

全角ひらがな、全角カタカナを判別します。

Function [全角ひらがな](ByVal c)
c=AscW(c)
[全角ひらがな]=&H3041<=c And c<=&H3093
End Function

Function [全角カタカナ](ByVal c)
c=AscW(c)
[全角カタカナ]=&H30a1<=c And c<=&H30f6
End Function

« JIS非漢字、第一水準、第二水準の判別方法 | トップページ | 「Windows 画像と Fax ビューア」でファイルを表示または印刷するショートカット »