[Resolvido]Campo preenchido, obrigar a preencher outro campo.

Boa tarde

Tenho dois campos num formulario

Campo " Vendedor "

Campo " Comissao "

Queria no botão de gravar o seguinte.

Se o campo " Vendedor " estiver preenchido, obrigar a preencher o campo " Comissão "

Com este comando deteta que o campo " Comissão " não está preenchido, e dá a informação da MsgBox.

If Not IsNull(Me.Vendedor) Or Me.Comissao = "" Then
MsgBox "Falta o Valor da Comissão !", vbCritical, "Aviso"
Me.Comissao.SetFocus
Exit Sub
Else
End If

Mas depois de preencher o campo " Comissão" continua a dar a mesma MsgBox

If Len("" & Me.Vendedor) = 0 Then
   If Len("" &  Me.Comissao) = 0 Then
        MsgBox "Falta o Valor da Comissão !", vbCritical, "Aviso"
        Me.Comissao.SetFocus
        Exit Sub
   End If
Else
End If

a expressão Len("" & Me.NomeCampo) = 0 Checa brancos e nulos

Cumprimentos.

Obrigado Piloto

O Fórum agradece o Retorno.