Detectar quan a l'obrir un formulari no retorna dades ( sense dades )

 Si vols detectar quan una consulta no retorna dades en un formulari d'Access, pots utilitzar el codi VBA per comprovar si el conjunt de registres (recordset) del formulari està buit.

Exemple de com fer-ho:

Private Sub Form_Current()

    ' Comprova si el formulari té registres

    If Me.Recordset.EOF And Me.Recordset.BOF Then

        MsgBox "No hi ha dades disponibles per mostrar en aquest formulari.", vbExclamation, "Cap dada trobada"

        ' Opcionalment, pots amagar certs controls o tancar el formulari

        ' Me.Visible = False

    End If

End Sub

Comentaris

Entrades populars