I am trying to pass a value from one form to the next when selecting an option on a combobox. The subform opens just fine, but when I try to save it, it tells me the key value is null. The key value is the value I thought I passed in the arguments. It is an automated number field in the main form and a number field in the subform. What am I missing?
Private Sub Combo345_Change()
If Combo345.Value = "Specific Dates" Then
DoCmd.OpenForm "frmSpecificDates", , , "ContractDBNumber =" & Me.ContractDBNumber.Value
If Combo345.Value = "per Airing" Then
DoCmd.OpenForm "frmPerAiring", , , "ContractDBNumber =" & Me.ContractDBNumber.Value