Query sintassi non corretta

Eseguendo questa query mi dice: Sintassi non corretta in prossimità di '='

Questo è il codice del form2 che mi inserisce la nuova operazione alla tabella contabilità

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        ContabilitaBindingSource.EndEdit()
        ContabilitaTableAdapter.Update(BudgetFamiliareDataSet.contabilita)
        ContabilitaBindingSource.AddNew()
        Form1.ContabilitaTableAdapter.Fill(Form1.BudgetFamiliareDataSet.contabilita)


        Form1.BntFiltra.BackColor = Color.WhiteSmoke
        Form1.BntTuttiDati.BackColor = Color.WhiteSmoke
        Form1.BntMeseCorrente.BackColor = Color.WhiteSmoke
        Form1.BntAnnoCorrente.BackColor = Color.LightCyan
        Form1.Button3.BackColor = Color.WhiteSmoke
        Form1.BntAnnoScorso.BackColor = Color.WhiteSmoke

        Try 'qui calcolo il sado delle entrate e delle uscite
            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 TotaleE, SUM(uscite) As TotaleU FROM contabilita WHERE idconto =  " & IdContoTextBox.Text & ""

            cmd = New SqlCommand(Sql, conn)
            conn.Open()

            Dim DR As SqlDataReader
            DR = cmd.ExecuteReader

            DR.Read()

            Dim TotE As Decimal = IIf(IsDBNull(DR("TotaleE")), 0, DR("TotaleE"))
            Dim TotU As Decimal = IIf(IsDBNull(DR("TotaleU")), 0, DR("TotaleU"))

            Form1.Label10.Text = String.Format("{0:c2}", TotE - TotU).ToString()
            Form1.Label10.ForeColor = IIf(TotE - TotU < 0, Color.Red, Color.Green)

            cmd.Dispose()
            conn.Close()

        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try


        Try
            Dim entrate As Decimal = 0
            Dim uscite As Decimal = 0


            For r = 0 To Form1.ContabilitaDataGridView.Rows.Count - 1
                If Not DBNull.Value.Equals(Form1.ContabilitaDataGridView(6, r).Value) Then
                    uscite += CType(Form1.ContabilitaDataGridView.Rows(r).Cells(6).Value, Double)
                End If
            Next


            For r = 0 To Form1.ContabilitaDataGridView.Rows.Count - 1
                If Not DBNull.Value.Equals(Form1.ContabilitaDataGridView(5, r).Value) Then
                    entrate += CType(Form1.ContabilitaDataGridView.Rows(r).Cells(5).Value, Double)
                End If

            Next

            Form1.LblTotale.Text = (entrate - uscite).ToString("c2")
            Form1.TextBox2.Text = (entrate - uscite).ToString("c2")

            If Form1.LblTotale.Text < 0 Then
                Form1.LblTotale.ForeColor = Color.Red
            Else
                Form1.LblTotale.ForeColor = Color.Green
            End If

            Form1.ContabilitaDataGridView.FirstDisplayedScrollingRowIndex = Form1.ContabilitaDataGridView.RowCount - 2

        Catch ex As Exception

        End Try

End Sub

Come posso corregere ?

Dopo

Dim Sql ...

aggiungi la riga

MessageBox.Show(Sql)

e facci vedere cosa mostra la finestra di messaggio

nel messaggio mi ritorna:

SELECT SUM(entrate) As TotaleE, SUM(uscite) As TotaleU FROM contabilita WHERE idconto =

Quindi cosa manca, secondo te?

Antonio mi dispiace sono 15 gg. che cerco di capire, la butto lì forse il nome del conto?

Dopo l' = non c'è niente, lo hai visto? Cosa ci dovrebbe essere?

Originariamente inviato da AntonioG

Dopo l' = non c'è niente, lo hai visto? Cosa ci dovrebbe essere?

Ma quella è una L

Ma che dici???

Antonio lo so che tu vuoi che ci arrivi io da solo per farmi capire, infatti dal messaggio alla fine della query:

SELECT SUM(entrate) As TotaleE, SUM(uscite) As TotaleU FROM contabilita WHERE idconto =

non c'è niente, ma io ho messo: " & IdContoTextBox.Text & ""

sto sbagliando tutto?

Evidentemente devi controllare il contenuto di

IdContoTextBox

perché in quel momento è vuoto.

Inserisci il valore nel textbox prima di usare il Button1 ?