Daten aus Listenfeld auslesen

[airmexx]

hallo,

hab da mal ein problem. ich möchte gerne mit hilfe eines recordsets daten aus einer tabelle auslesen.
der grundgedanke war das ich, aus einem listenfeld eine spalte summiere.

   Dim sql As Variant
    Dim rec As DAO.Recordset
    Dim db As DAO.Database

    sql = ("SELECT sum(Preis) FROM tbl_ausgaben")
    Set rec = CurrentDb.OpenRecordset(sql, dbOpenSnapshot)
    Me.lbl_summe_ausgaben.Caption = sql

 

[Yaslaw]

Und was ist die Frage?