文字列が半角であることを調べるには

Len([文字フィールド名]) = LenB(StrConv([文字フィールド名], vbFromUnicode))

左辺のLen()は文字フィールドの文字数で、全角、半角に係らずそのテキストの文字数を取得します。

右辺のLenB（）はテキストのバイト数を取得しますが、現在、半角、全角とも一文字2バイトと勘定されますので、これを半角1バイトに変換する関数がstrConv([文字フィールド名],vbFromUnicode)です。

上記の式は半角の場合には左辺と右辺が等しくなるという訳です。