Dim s1,s2 As String
s1="え"
s2="E"

このように変数に入っている文字列が全角か半角かを調べる方法はないのでしょうか？