{"id":55000246,"date":"2014-12-01T00:00:00","date_gmt":"2020-01-24T15:59:11","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=246"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Detailformulare_aufrufen","status":"publish","type":"post","link":"https:\/\/access-basics.de\/index.php\/Detailformulare_aufrufen.html","title":{"rendered":"Detailformulare aufrufen"},"content":{"rendered":"

Access-Anwendungen enthalten oft übersichtsformulare, die alle Datensätze (oder eine Auswahl davon) in Listenform anzeigen, also beispielsweise in einem Unterformular in der Datenblattansicht oder in einem Listenfeld. Dieses ist dann üblicherweise mit einer Schaltfläche ausgestattet, um die Details zu einem solchen Datensatz in einem entsprechend gestalteten Formular anzuzeigen. Dieser Artikel zeigt, wie Sie das öffnen eines solchen Formulars programmieren.<\/p>\n

Beispieldatenbank<\/h2>\n

Die Beispiele dieses Artikels finden Sie in der Datenbank 1406_DetailformulareAufrufen.mdb<\/b>.<\/p>\n

übersichts- und Detailformular<\/h2>\n

Bei den folgenden Beispielen gehen wir davon aus, dass Sie ein Formular verwenden, dass die Daten einer Tabelle entweder in einem Unterformular, einem Listenfeld oder auch in der Endlosansicht anzeigt.<\/p>\n

Wenn der Benutzer einen der Datensätze auswählt und dann etwa auf eine Schaltfläche mit der Beschriftung Details anzeigen <\/b>klickt, soll der aktuelle Datensatz in einem Detailformular angezeigt werden.<\/p>\n

Das Detailformular besteht aus einem Hauptformular namens frmArtikeluebersicht <\/b>und dem Unterformular sfmArtikeluebersicht<\/b>.<\/p>\n

Das Unterformular verwendet die Tabelle tblArtikel<\/b> als Datenherkunft und zeigt seine Daten in der Datenblattansicht an (siehe Bild 1).<\/p>\n

\"Unterformular<\/a><\/p>\n

Bild 1: Unterformular mit der Liste der Artikel<\/p>\n

Das Hauptformular frmArtikeluebersicht <\/b>nimmt das Unterformular auf und zunächst eine Schaltfläche namens cmdDetailsAnzeigen <\/b>(siehe Bild 2). Wenn Sie die Eigenschaften Navigationsschaltflächen<\/b>, Datensatzmarkierer <\/b>und Bildlaufleisten <\/b>des Hauptformulars auf Nein <\/b>und Automatisch zentrieren <\/b>auf Ja <\/b>einstellen, erscheint das Formular in der Formularansicht wie in Bild 3.<\/p>\n

\"Haupt-<\/a><\/p>\n

Bild 2: Haupt- und Unterformular in der Entwurfsansicht<\/p>\n

\"Haupt-<\/a><\/p>\n

Bild 3: Haupt- und Unterformular in der Formularansicht<\/p>\n

Das Formular zur Anzeige der Artikeldetails heißt frmArtikeldetails <\/b>und verwendet die Tabelle tblArtikel <\/b>als Datenherkunft – genau wie das Unterformular sfmArtikeluebersicht<\/b>. Es enthält alle Felder der Tabelle tblArtikel <\/b>sowie eine Schaltfläche namens cmdOK<\/b>, um das Formular wieder zu schließen (siehe Bild 4).<\/p>\n

\"Entwurf<\/a><\/p>\n

Bild 4: Entwurf des Detailformulars<\/p>\n

Datensatz-ID per WhereCondition<\/h2>\n

Eine Art, eine Information von einem Formular zum nächsten zu übergeben, ist die übergabe einer Bedingung per WhereCondition<\/b>. Wenn Sie einen Datensatz im Unterformular des Formulars frmArtikeluebersicht <\/b>markieren und dann auf die Schaltfläche mit dem Text Details anzeigen <\/b>klicken, soll dies die Prozedur Listing 1 auslösen.<\/p>\n

Private Sub <\/span>cmdDetailsAnzeigen_Click()\r\n     Dim <\/span>lngArtikelID As Long<\/span>\r\n     lngArtikelID = Nz(Me!sfmArtikeluebersicht.Form!ArtikelID)\r\n     If <\/span>Not<\/span> lngArtikelID = 0 Then<\/span>\r\n         DoCmd.OpenForm \"frmArtikeldetails\", WhereCondition:=\"ArtikelID = \" & lngArtikelID\r\n     Else<\/span>\r\n         MsgBox<\/span> \"Markieren Sie zunächst einen Artikel.\"\r\n     End If<\/span>\r\nEnd Sub<\/span><\/pre>\n
Listing 1: Aufrufen des Detailformular mit entsprechendem Filter<\/p>\n
Diese Prozedur speichert zunächst den Primärschlüsselwert des aktuell im Unterformular markierten Datensatzes in der Variablen lngArtikelID<\/b>. Diesen ermittelt sie über den Ausdruck Me!sfmArtikeluebersicht.Form!ArtikelID<\/b>. Me <\/b>referenziert das aktuelle Formular, sfmArtikeluebersicht <\/b>das Unterformular-Steuerelement, die Eigenschaft Form <\/b>das darin enthaltene Unterformular (das ebenfalls sfmArtikeluebersicht <\/b>heißt) und ArtikelID <\/b>das Feld mit dem betreffenden Wert.<\/p>\n
Befindet der Datensatzzeiger sich aktuell auf einem leeren, neuen Datensatz, liefert dieser Ausdruck den Wert Null<\/b>. Wenn wir versuchen, diesen Wert in einer Long<\/b>-Variablen wie lngArtikelID <\/b>zu speichern, löst dies einen Fehler aus.<\/p>\n
Also wandeln wir den Ausdruck zuvor vorsichtshalber mit der Funktion Nz <\/b>in den Zahlenwert 0 <\/b>um. Dies geschieht nur in dem Fall, dass der als erster Parameter der Funktion angegebene Ausdruck den Wert Null <\/b>enthält – andernfalls liefert Nz <\/b>den Wert aus dem ersten Ausdruck.<\/p>\n
Die folgende If…Then<\/b>-Bedingung prüft, ob lngArtikelID <\/b>den Wert 0 <\/b>enthält. Falls nicht, ruft sie das Formular frmArtikeldetails <\/b>mit dem Wert „ArtikelID = “ & lngArtikelID <\/b>für den Parameter WhereCondition <\/b>auf (siehe Bild 5).<\/p>\n
\"Aufruf<\/a><\/p>\n
Bild 5: Aufruf des Detailformulars für den aktuellen Eintrag im Unterformular<\/p>\n
Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t
\n\n\t\t\n\t\t