it-swarm.com.de

So brechen Sie lange Zeichenfolgen in mehrere Zeilen

Ich verwende diese Einfügeanweisung in meinem Code in vba Excel, kann sie jedoch nicht in mehr als eine Zeile aufteilen

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & " _
,'" & txtContractStartDate.Value & "' _
,'" & txtSeatNo.Value & "' _
,'" & txtFloor.Value & "','" & txtLeaves.Value & "')"

Es wird der Fehler "Erwartetes Ende der Anweisung" ausgegeben. Bitte helfen.

26
user2396829

Sie können das Zeilenfortsetzungszeichen VB nicht innerhalb einer Zeichenfolge verwenden.

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & _
"','" & txtContractStartDate.Value &  _
"','" & txtSeatNo.Value & _
"','" & txtFloor.Value & "','" & txtLeaves.Value & "')"
36
DougM

sie können Ihren String einfach in mehreren Schritten erstellen, ein bisschen redundant, aber er hält den Code lesbar und behält die Übersichtlichkeit während des Debugging oder der Bearbeitung

SqlQueryString = "Insert into Employee values(" 
SqlQueryString = SqlQueryString & txtEmployeeNo.Value & " ,"
SqlQueryString = SqlQueryString & " '" & txtEmployeeNo.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtContractStartDate.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtSeatNo.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtContractStartDate.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtSeatNo.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtFloor.Value & "',"
SqlQueryString = SqlQueryString & " '" & txtLeaves.Value & "' )"
10
Georges Brisset

Wenn der lange String zu mehreren Zeilen verwirrt. Dann können Sie mz-tools addin installieren, eine Freeware mit dem Dienstprogramm, das die Zeile für Sie aufteilt.

Mz-tools herunterladen

Wenn Ihre Zeichenfolge wie folgt aussieht

SqlQueryString = "Insert into Employee values(" & txtEmployeeNo.Value & "','" & txtContractStartDate.Value & "','" & txtSeatNo.Value & "','" & txtFloor.Value & "','" & txtLeaves.Value & "')"

Wählen Sie einfach die Zeichenfolge aus> klicken Sie mit der rechten Maustaste auf VBA IDE> Wählen Sie MZ-tools> Split Lines aus

enter image description here

5
Santosh

Ich weiß, dass dies super duper alt ist, aber in der unwahrscheinlichen Situation, dass jemand danach sucht, unterstützt Vb ab Visual Basic 14 die Interpolation. Sooooo cool!

Beispiel:

SQLQueryString = $"
   Insert into Employee values( 
       {txtEmployeeNo}, 
       {txtContractsStartDate},
       {txtSeatNo},
       {txtFloor},
       {txtLeaves}
)"

Es klappt. Dokumentation hier

0
dgo