どさんこさん、こんにちは。

＞また、９桁の電話番号の局番（頭５桁）をテーブルにもたせて、チェックさせようとも
＞考えています。
＞
＞何か良い入力チェック方法はありませんか？

わたしは「match関数」を使っています。
itemchangedイベントや、更新する直前の入力チェックで

if Not Match(ls_tel,\"^[0-9][0-9]\\-[0-9][0-9][0-9][0-9]$\") then
   エラーメッセージ
end if

としています。「99-9999」意外のパターンがエラーになります
「9-99999」もエラーになります。

ただ、わたしもこてちゅさんと同じで、ＴＥＬ番号は文字列で管理しています
そのほうがチェックしやすいですから

ではでは