Access 2013 VBAでテキストボックスの内容が変更された場合、コンボボックスの選択をデフォルト値に変更するには

Question

2つのコンボボックスの選択をデフォルト値に変更する必要があります。変化する。在庫の日付が変更されると（テキストボックスQtr1Date1）、新しい「変更理由」と「変更イニシエータ」（コンボボックスQtr1Date1ChangerとQtr1Date1Initiator）を選択する必要があります。テキストボックスにAfterUpdateイベントがあり、監査テーブルに新しい日付が記録されています。日付がデフォルト値に変更された場合、2つのコンボボックスの内容を変更するためにここに何かを追加できますか？

Private Sub Qtr1Date1_AfterUpdate() 
     Call LogChanges(StoreCode) 
    End Sub 

Answer 1

これは私が解決することができた方法です：

Private Sub Qtr1Date1_AfterUpdate() 
     Call LogChanges(StoreCode) 
     Qtr1Date1Changer = "<Select>" 
     Qtr1Date1Reason = "<Select>" 
    End Sub