subitissimo!

rs.Open "select id,articolo, fornitore, data, format (quant, '0.00')as quant , format (prezzo, '0.00' & ' €')as prezzo, format (tot, '0.00' & ' €')as tot from acquisti where data = '" & Label2 & "' order by data desc, articolo asc", db

data è in formato data.