Kombinationsfeld Hängen an alten Daten

Question

Ich habe ein Formular, das ich eine Umschalttaste platziert habe, damit der Benutzer die Daten löschen kann, die sie zuvor aus drei Kombinationsfeldern hatten. Ich habe eine SQL erstellt, um die Daten in der Tabelle zu löschen, an die das Formular gebunden ist, aber die Kombinationsfelder behalten immer noch die Daten bei, obwohl die Tabelle keine Daten enthält. Wie kann ich die Kombinationsfelder zurücksetzen? Selbst wenn ich das Formular öffne und schließe, sind die alten Daten immer noch in der Combobox. Ich möchte diese Combos zurücksetzen. Hilfe!

Private Sub Reset_Company_Marketer_Product_Click()

Dim DltPrvCompMarkProd_TableSQL As String 
DltPrvCompMarkProd_TableSQL = "DELETE User_SubProducts.* FROM User_SubProducts;" 

DoCmd.SetWarnings False 
DoCmd.RunSQL DltPrvCompMarkProd_TableSQL 
DoCmd.SetWarnings True 

Answer 1

Private Sub Reset_Company_Marketer_Product_Click()

Dim DltPrvCompMarkProd_TableSQL As String 
DltPrvCompMarkProd_TableSQL = "DELETE User_SubProducts.* FROM User_SubProducts;" 
    Me!Company_Select_Combo = Null 
    Me!Marketer_Select_Combo = Null 
    Me!Product_Select_Combo = Null 
Company_Select_Combo.Enabled = True 
Marketer_Select_Combo.Visible = False 
Product_Select_Combo.Visible = False 

DoCmd.SetWarnings False 
DoCmd.RunSQL DltPrvCompMarkProd_TableSQL 
DoCmd.SetWarnings True