Questo è il codice:
Dim cmd As SqlCommand
Dim conn As New SqlConnection("Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=|DataDirectory|\My Project\BudgetFamiliare.mdf;Integrated Security=True")
Dim Sql As String = “SELECT sum(entrate) As Totale FROM contabilita where IdConto=1 and (year(data) = year(GETDATE())"
cmd = New SqlCommand(Sql, conn)
conn.Open()
Dim DR As SqlDataReader
DR = cmd.ExecuteReader
While DR.Read
Label19.Text = DR("Totale")
Label19.Text = String.Format("{0:c2}", DR("Totale")).ToString
End While
cmd.Dispose()
conn.Close()
Mentre questo è il codice per il conto 2
]Dim cmd As SqlCommand
Dim conn As New SqlConnection("Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=|DataDirectory|\My Project\BudgetFamiliare.mdf;Integrated Security=True")
Dim Sql As String = “SELECT sum(entrate) As Totale FROM contabilita where IdConto=2 and (year(data) = year(GETDATE())"
cmd = New SqlCommand(Sql, conn)
conn.Open()
Dim DR As SqlDataReader
DR = cmd.ExecuteReader
While DR.Read
Label19.Text = DR("Totale")
Label19.Text = String.Format("{0:c2}", DR("Totale")).ToString
End While
cmd.Dispose()
conn.Close()
Così mi visualizza il totale sempre del conto 2 nella label anche quando clicco su conto 1