Prova:
codice:sqr = "select descrizione,Um,qta,prezzoacq,tot from carico where ndoc= " & a & " And datan = '#" & txtdata.Text & "#'"
Prova:
codice:sqr = "select descrizione,Um,qta,prezzoacq,tot from carico where ndoc= " & a & " And datan = '#" & txtdata.Text & "#'"
Fusion
Currency Text Box (Updated: 16 Maggio 2008): http://digilander.libero.it/cmfusion/CurrencyTextBox.html