[RISOLTO]Come scrivere una stringa su più righe

[clabe69]

Salve a tutti; è la prima volta che scrivo quì, ma ho letto tanto e mi site stati molto d'aiuto e per questo vi ringrazio.
Bando ai convenevoli. Come faccio a scrivere una stringa su più righe?

Codice: [Seleziona]

  sql1 = "UPDATE tconfbtn SET text = '" & TextBox1.Text & "', list1 = '" & TxtPrezzo1.Text & "', list2 = '" & TxtPrezzo2.Text
  sql2 = "', bkgnd = " & btnExe.Background & ", fognd = " & btnExe.Foreground & ", fntno = '" & btnExe.Font.Name & "', fntbo = " & fntbo
  sql3 = ", fntso = " & fntso & ", fntul = " & fntul & " WHERE id = " & FMain.inBtn

  sql = sql1 & sql2 & sql3

  MyRes = modConn.$Conn.Exec(sql)

In pratica vorrei evitare l'sql1, l'sql2, e l'sql3 ma scrivere tutto come sql = ".................. su piu righe per comodità di lettura del codice.
Grazie.

[milio]

Basta fare in questo modo:

Codice: [Seleziona]

Dim Sql As String

  Sql = "UPDATE tconfbtn SET text = '" & TextBox1.Text & "', list1 = '" & TxtPrezzo1.Text & "', list2 = '" & TxtPrezzo2.Text
  Sql &= "', bkgnd = " & btnExe.Background & ", fognd = " & btnExe.Foreground & ", fntno = '" & btnExe.Font.Name & "', fntbo = " & fntbo
  Sql &= ", fntso = " & fntso & ", fntul = " & fntul & " WHERE id = " & FMain.inBtn

  MyRes = modConn.$Conn.Exec(sql)

Oppure:

Codice: [Seleziona]

Dim Sql As String

  Sql = "UPDATE tconfbtn SET text = '" & TextBox1.Text & "', list1 = '" & TxtPrezzo1.Text & "', list2 = '" & TxtPrezzo2.Text &
        "', bkgnd = " & btnExe.Background & ", fognd = " & btnExe.Foreground & ", fntno = '" & btnExe.Font.Name & "', fntbo = " & fntbo &
        ", fntso = " & fntso & ", fntul = " & fntul & " WHERE id = " & FMain.inBtn

  MyRes = modConn.$Conn.Exec(sql)

[clabe69]

Grazie; avevo già provato con il tuo secondo esempio, ma non voleva funzionare: evidentemente tu l'hai scritto meglio, perchè va benissimo! Grazie.