none
eu não consigo verificar o campo da tabela tipo anexo RRS feed

  • Pergunta

  • Colegas, boa noite,  me ajudem aqui ,  fiz um formulário e coloquei condição em cada um ou seja, nenhuma pode estar vazio ,mas no campo tipo anexo  a condição "if" não verifica. Alguém poderia me explicar como faço ele funcionar nesse tipo de campo?

    Option Compare Database
    Private Sub Comando314_Click()
    If IsNull(Me.Nome) Then
    MsgBox "O campo Nome , é obrigatório", vbInformation, "Aviso"
    Me.Nome.SetFocus
    Me.Nome.BackColor = 646464
    DoCmd.CancelEvent
    ''
    ElseIf IsNull(Me.Combinação47) = True Then
    MsgBox "O campo Posição, é obrigatório", vbInformation, "Atenção"
    Me.Combinação47.SetFocus
    Me.Combinação47.BackColor = 646464
    ''
    ElseIf IsNull(Me.Combinação51) = True Then
    MsgBox "O campo Status, é obrigatório", vbInformation, "Atenção"
    Me.Combinação51.SetFocus
    Me.Combinação51.BackColor = 646464
    ''
    ElseIf IsNull(Me.Foto) = True Then
    MsgBox "O campo Foto, é obrigatório", vbInformation, "Atenção"
    Me.Foto.SetFocus
    Me.Foto.BackColor = 646464


    Else
    DoCmd.Save
    MsgBox "  cadastrado com sucesso!", vbInformation + vbOKOnly, " Secretario ADV"
    End If

       
    End Sub
    sábado, 16 de junho de 2018 20:56

Todas as Respostas

  • O campo foto é uma imagem ou uma textbox?

    Se for imagem, verifique se a propriedade Picture está vazia para validar:

    https://msdn.microsoft.com/pt-br/vba/access-vba/articles/image-picture-property-access

    quarta-feira, 4 de julho de 2018 01:51