Crdo di aver risolto con queste righe di codice:
Se voleste comunicarmi errori o eventuali migliorie ve ne sarei grato!codice:Dim sql2 As String = "SELECT SUM(quantita) FROM fede WHERE nome = 'farina'" Dim sumquery As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter(sql2, cn) Dim sumds As DataTable = New DataTable() sumquery.Fill(sumds) Me.TextBox4.Text = sumds.Rows(0).Item(0)

Rispondi quotando