Перенос текст.константы - VB

Формулировка задачи:

Доброго дня господа !
Как записать тест.константу во множество строк
Надо записать в тексте проги здоровенный запрос

Dim S as String
S = "select A.UID Dir, 
       B.LeafName File,
       Lower(B.Extension) Ext,
       C.Content List 
       ...........................
     "

Такой перенос не работает
S = "select A.UID Dir,
B.LeafName File,
Lower(B.Extension) Ext,
C.Content List
...........................
"
А другого способа не знаю..

Решение задачи: «Перенос текст.константы»

textual
                            Листинг программы 
                        
                            s = "vbn fgh dgjdfhj" & _
	"df h drgfhdjhf" & _
	" hdfg hd jdgh "