Title:
Recordsets in VBA-/MS-Access (Teil 3 - Navigation innerhalb des Recordset) in besserer Auflösung
Video:
Description:Ziel: Recordset aus Tabelle "tblPersonen" laden und Name, Vorname aller Personen im Direktbereich ausgeben Ansatz - Recordset befüllen und Zeiger steht auf erstem Datensatz oder wenn leer, dann auf Ende Set rcsPers = db.OpenRecordset("tblPersonen") - Prüfen, ob Ende des Recordsets erreicht Do Until rcsPers.EOF '...Loop - Wenn nicht Ende, dann Datensatz ausgeben Debug.Print rcsPers.Fields("persName")and_ ", " and rcsPers.Fields("persVorname") - Zeiger zum nächsten Element verschieben rcsPers.MoveNext - Solange fortfahren, bis Ende erreicht Loop Auswertung - Ausgabe im Direktbereich zeigt alle Namen und Vornamen der Personen aus Tabelle "tblPersonen", Spalte "persName", "persVorname"
Published:
03/May/2011
Recordsets in VBA-/MS-Access (Teil 3 - Navigation innerhalb des Recordset) in besserer Auflösung
Video:
Description:Ziel: Recordset aus Tabelle "tblPersonen" laden und Name, Vorname aller Personen im Direktbereich ausgeben Ansatz - Recordset befüllen und Zeiger steht auf erstem Datensatz oder wenn leer, dann auf Ende Set rcsPers = db.OpenRecordset("tblPersonen") - Prüfen, ob Ende des Recordsets erreicht Do Until rcsPers.EOF '...Loop - Wenn nicht Ende, dann Datensatz ausgeben Debug.Print rcsPers.Fields("persName")and_ ", " and rcsPers.Fields("persVorname") - Zeiger zum nächsten Element verschieben rcsPers.MoveNext - Solange fortfahren, bis Ende erreicht Loop Auswertung - Ausgabe im Direktbereich zeigt alle Namen und Vornamen der Personen aus Tabelle "tblPersonen", Spalte "persName", "persVorname"
Published:
03/May/2011
No comments:
Post a Comment