If Then Statement & Equal to Reference Access VBA

Question

У меня небольшая проблема, и я думаю, что кто-то (явно умнее меня) может помочь мне. По некоторым причинам я не могу получить эту работу правильно:

& me.prepayment_month = «»

Prepayment_Month раскрывающийся список всех месяцев. Если я введу месяц и пройду через код, признается месяц. Моя проблема в том, когда она пуста. Он не признает это условие. Я пробовал Null, "", Blank, и все не были признаны.

Private Sub Add_Prepayment_Save() 
DoCmd.Save acForm, "frmInvoices" 
If Me.Rec_d_Prepayment = 0 Then 
DoCmd.Save acForm, "frmInvoices" 
End If 
If Me.Rec_d_Prepayment <> 0 & Me.prepayment_month = " " Then 
    MsgBox "Please Update Prepayment Month" 
End If 
If Me.Rec_d_Prepayment <> 0 & Me.prepayment_month <> "" Then 
    MsgBox "This will be added to tblPrePayment" 
End If 
End Sub 

------- Update 1 ---------

Private Sub Add_Prepayment_Save() 
DoCmd.Save acForm, "frmInvoices" 
If Me.Rec_d_Prepayment = 0 Then 
DoCmd.Save acForm, "frmInvoices" 
End If 
If Me.Rec_d_Prepayment <> 0 And Me.prepayment_month = "" Then 
    MsgBox "Please Update Prepayment Month" 
End If 
If Me.Rec_d_Prepayment <> 0 And Me.prepayment_month <> "" Then 
    MsgBox "This will be added to tblPrePayment" 
End If 
End Sub 

Answer 1

амперсанд Объединяет строки вместе в языках на основе VB. Для реализации логического оператора AND используйте ключевое слово AND. То, что вы делаете, это склеивание нуля до значения Me.prepayment_month.