[ Φόρμες ] No data

[nisgia]

Καλημέρα σε όλους και όλες!

Φίλε Ανδρέα, το μυστικό για να παραμείνει ορατή η ενότητα λεπτομέρειας μιας δεσμευμένης συνεχόμενης φόρμας
όταν αυτή δεν επιστρέφει εγγραφές, είναι να τη μετατρέψεις σε μη δεσμευμένη.

Αυτό ακριβώς κάνω και εγώ στο νέο παράδειγμα που επισυνάπτω με τον παρακάτω τρόπο:

Private Function ReturnsRecords() As Boolean
    Dim fRetRecs As Boolean
    
    fRetRecs = Me.Recordset.RecordCount > 0
    If Not fRetRecs Then
        Set Me.Recordset = Nothing
        Me.txtYear.SetFocus
    End If
    Me.lblNoData.Visible = Not fRetRecs
    ReturnsRecords = fRetRecs
End Function

Άνοιξε τη μοναδική φόρμα του συνημμένου δίνοντας μια άκυρη τιμή έτους (>2009 ή τίποτα),
απάντησε καταφατικά στο προειδοποιητικό μήνυμα που θα εμφανιστεί
και στη συνέχεια παίξε με το πλαίσιο "Από έτος:" για να δεις τα αποτελέσματα.

Άνοιξε και τον VBE να δεις και τον υπόλοιπο κώδικα της φόρμας.

Ελπίζω αυτή τη φορά να βοηθάω...

Φιλικά,
Γιάννης