Jump to content
Fórum Script Brasil
  • 0

Erro 3075 na expressão


Flecha

Question

Olá,

Estou com um problema na expressão abaixo, em um form com um campo de entrada "numerocad" e um botão de OK que testa o BD para ver se existe o nº digitado, se existir ele abre para verificação se não existir ele abre um form para cadastrá-lo, até ai tudo bem!

O que acontece é se eu clicar Ok com o campo vazio dá o erro 3075 informando erro de sintaxe (operador faltando) 'Numero ='

Como possso resolver

Private Sub Comando2_Click()
If IsNull(DLookup("Numero", "Material", "Numero = " & NumeroCad)) Then
    DoCmd.OpenForm "frmMaterialCadastro"
Else
  MsgBox "Esse Nº já está Cadastrado, Verifique! vou abrir ele...." & Chr(13) & Chr(10) & _
                 Chr(10) & "No formulário que abrir,  confira que ele já esta Cadastrado" & Chr(13) & Chr(10) & _
                 Chr(10) & "Se precisar  ALTERAR algo faça nele e depois Feche o Formulário", , "Ops.... Esse Nº de Material já tem!!!"
   'DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "Material verificação", , "Material", "Numero = " & NumeroCad
DoCmd.Close acForm, Me.Name
End If
End Sub

Link to comment
Share on other sites

1 answer to this question

Recommended Posts

  • 0

acrescente nos campos que retornam nulo a função NZ()

nz([seuObjeto],valorSeNulo)

Em alguns casos você vai substituir a virgula que separa os argumentos da função por ponto e virgula.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      652k
×
×
  • Create New...