Access バリアント型ではない変数にNull値を代入しようとしました

Access バリアント型ではない変数にNull値を代入しようとしました

コンボボックスを作成し
コントロールソースをIDとし
nullを入力すると以下の様なエラーが発生しました

バリアント型ではない変数にNull値を代入しようとしました

vbaで色々制御を入れてみたが解決されず・・・
どこにも変数なんて使ってないのになぁ・・・

問題は
フォームのコントロールソースに
リレーションを張っていたのですが
そのリレーションのキーをIDとしていたのが原因でした。

IDをnullにしちゃうともう片方のテーブルでキーが無いから
困っちゃうよというエラーでした。

わかりにくいよｗMSさん