String Variable - Compile Error Expected End of Statment

[paddysheeran]

HI All,

when declaring a string variable why would the following work fine:

[vba]Sub Query_SQL3()
Dim QSQL As String
QSQL = "Array(""SELECT TYS____FAULT.SEVERITY,TYS____FAULT.OLD_FAULT_ID"")"
End Sub[/vba]

But the following produces the compile error stement:

[vba]Sub Query_SQL3()
Dim QSQL As String
QSQL = "Array(""SELECT TYS____FAULT.SEVERITY, _
TYS____FAULT.OLD_FAULT_ID"")"
End Sub[/vba]

Im sure its something simple but cant put my finger on it.

thanks,

Paddy.

[Bob Phillips]

Try this

[vba]

Sub Query_SQL3()
Dim QSQL As String
QSQL = "Array(""SELECT TYS____FAULT.SEVERITY, " & _
"TYS____FAULT.OLD_FAULT_ID"")"
End Sub
[/vba]