Многострочные строки в VB.NET

127

Есть ли способ иметь многострочные строки в VB.NET, например python

a = """
multi
line
string
"""

или php

$a = <<<END
multi
line
string
END;

?

Конечно, что-то, что не является

"multi" & _
"line
Показать ещё 1 комментарий
Теги:

20 ответов

206

Вы можете использовать XML Literals для достижения аналогичного эффекта:

Imports System.XML
Imports System.XML.Linq
Imports System.Core

Dim s As String = <a>Hello
World</a>.Value

Помните, что если у вас есть специальные символы, вы должны использовать блок CDATA:

Dim s As String = <![CDATA[Hello
World & Space]]>.Value

2015 UPDATE:

Многострочные строковые литералы были представлены в Visual Basic 14 Visual Studio 2015). Вышеприведенный пример можно записать следующим образом:

Dim s As String = "Hello
World & Space"

MSDN article isn't updated yet (as of 2015-08-01), so check some answers below for details.

Детали добавляются в Roslyn New-Language-Features-in-VB-14 Репозиторий Github.

  • 0
    как вы можете сделать замену переменных там? как "a =" & someint & ","
  • 1
    @Christopher - мне обычно удобнее помещать токены в строковую константу, а затем заменять их. Так что s="... a=~someint~ ..." а затем s=s.Replace("~someint~', SomeInt) .
Показать ещё 9 комментариев
43

У VB.Net нет такой функции, и в Visual Studio 2010 будет не. Функция, которая ссылается на jirwin, называется неявным продолжением строки. Это связано с удалением _ из многострочного оператора или выражения. Это устраняет необходимость прервать многострочную строку с помощью _, но в VB до сих пор не существует многострочного строкового литерала.

Пример для многострочной строки

Visual Studio 2008

Dim x = "line1" & vbCrlf & _
        "line2"

Visual Studio 2010

Dim x = "line1" & vbCrlf & 
        "line2"
  • 0
    Так как же это работает для литералов XML? Либо это возможно, либо литералы XML используют другой метод - и если другой метод, то тот, который может быть расширен до многострочных строк.
  • 1
    @mellamokb Литералы XML ... особенные из-за отсутствия лучшего слова. Компилятор понимает их и, следовательно, позволит им неявно занимать несколько строк. Такая поддержка не была добавлена для многострочных строк. Добавить такую поддержку намного проще, чем XML-литералы, просто она не соответствовала планке для этого выпуска.
38

Я использовал этот вариант:

     Dim query As String = <![CDATA[
        SELECT 
            a.QuestionID
        FROM 
            CR_Answers a

        INNER JOIN 
            CR_Class c ON c.ClassID = a.ClassID
        INNER JOIN
            CR_Questions q ON q.QuestionID = a.QuestionID
        WHERE 
            a.CourseID = 1
        AND 
            c.ActionPlan = 1
        AND q.Q_Year = '11/12'
        AND q.Q_Term <= (SELECT CurrentTerm FROM CR_Current_Term)
    ]]>.Value()

он позволяет < > в строке

18

Многоязычные строковые литералы представлены в Visual Basic 14.0 - https://roslyn.codeplex.com/discussions/571884

Вы можете использовать его в VS2015 Preview, теперь - http://www.visualstudio.com/en-us/downloads/visual-studio-2015-downloads-vs (обратите внимание, что вы все равно можете использовать VS2015, даже если таргетинг на старую версию .NET рамки)

Dim multiline = "multi
line
string"

Строки VB в основном теперь совпадают с строковыми строками С# - они не поддерживают escape-последовательности обратного слеша, такие как \n, и они позволяют использовать строки новой строки внутри строки, и вы избегаете символа цитаты с двойными кавычками ""

  • 2
    Спасибо Lucian за добавление многострочных строк в VB. Может быть, вы можете обновить свой ответ, потому что VS 2015 сейчас RTM. И, может быть, вы также можете ткнуть кого-нибудь в вашей компании, чтобы обновить соответствующую статью MSDN .
14

Это была действительно полезная статья для меня, но никто не упоминал, как конкатенировать, если вы хотите отправить некоторые переменные, что вам нужно сделать в 99% случаев.

... <% = переменная % > ...

Вот как вы это делаете:

<SQL> SELECT * FROM MyTable WHERE FirstName='<%= EnteredName %>' </SQL>.Value

  • 17
    В этом случае вы хотите избежать конкатенации и вместо этого использовать параметры SQL, поскольку они лучше защищают от атак внедрения SQL. Однако я вижу, что это полезно для динамического генерирования SQL (без передачи пользовательского ввода).
10

Ну, так как вы, кажется, на своем питоне, могу предложить вам скопировать текст в python, например:

 s="""this is gonna 
last quite a 
few lines"""

то выполните a:

  for i in s.split('\n'):
    print 'mySB.AppendLine("%s")' % i

#    mySB.AppendLine("this is gonna")
#    mySB.AppendLine("last quite a")
#    mySB.AppendLine("few lines")

или

  print ' & _ \n'.join(map(lambda s: '"%s"' % s, s.split('\n')))

#    "this is gonna" & _ 
#    "last quite a" & _ 
#    "few lines"

то по крайней мере вы можете скопировать его и поместить в свой код VB. Бонусные баллы, если вы связываете горячую клавишу (быстрее всего: Autohotkey), чтобы сделать это для того, что находится в вашем буфере пасты. Эта же идея хорошо подходит для форматирования SQL.

8

Многострочные строки доступны с Visual Studio 2015.

Dim sql As String = "
    SELECT ID, Description
    FROM inventory
    ORDER BY DateAdded
"

Вы можете комбинировать их с строковой интерполяцией, чтобы максимизировать полезность:

Dim primaryKey As String = "ID"
Dim inventoryTable As String = "inventory"

Dim sql As String = $"
    SELECT {primaryKey}, Description
    FROM {inventoryTable}
    ORDER BY DateAdded
"

Обратите внимание, что интерполированные строки начинаются с $, и вам нужно позаботиться о ", { и }, содержащихся внутри, - преобразовать их в "", {{ или }} соответственно.

Здесь вы можете увидеть фактическое выделение синтаксиса интерполированных частей приведенного выше примера кода:

Изображение 7851

Если вы считаете, что их распознавание редактором Visual Studio также работает с рефакторингом (например, массовое переименование переменных), тогда вы правы, рефакторинг кода работает с ними. Не говоря уже о том, что они также поддержка IntelliSense, подсчет ссылок или анализ кода.

8

Многострочные строковые литералы в vb.net с использованием класса XElement.

Imports System.Xml.Linq

Public Sub Test()

dim sOderBy as string = ""

dim xe as XElement = <SQL>
                SELECT * FROM <%= sTableName %>
                 <ORDER_BY> ORDER BY <%= sOrderBy %></ORDER_BY>
                 </SQL>

'** conditionally remove a section 
if sOrderBy.Length = 0 then xe.<ORDER BY>.Remove

'** convert XElement value to a string 
dim sSQL as String = xe.Value

End Sub
6

Мне это самое неприятное в VB как языке. Серьезно, я однажды написал строку в файле и написал код что-то по строкам:

Dim s as String = file_get_contents("filename.txt")

чтобы я мог проверить запрос непосредственно на SQL-сервере, если мне нужно.

Мой текущий метод - использовать хранимую процедуру на SQL Server и просто вызвать это, чтобы я мог передавать параметры в запрос и т.д.

5

Я выяснил, как использовать как <! [CDATA [вместе с <% = для переменных, что позволяет вам без проблем создавать код.

В основном вы должны прервать теги CDATA перед переменной VB, а затем повторно добавить их после того, как CDATA не будет записывать код VB. Вам нужно обернуть весь блок кода в тег, потому что у вас будет несколько блоков CDATA.

Dim script As String = <code><![CDATA[
  <script type="text/javascript">
    var URL = ']]><%= domain %><![CDATA[/mypage.html';
  </script>]]>
</code>.value
3

Отказ от ответственности: я люблю питон. Это многострочные строки - одна из причин.

Но я также делаю VB.Net, так что здесь моя короткая вырезка для более читаемых длинных строк.

  Dim lines As String() = {
    "Line 1",
    "Line 2",
    "Line 3"
  }
  Dim s As String = Join(lines, vbCrLf)
  • 1
    Вам нужно _ в конце строки для каждой "строки ..", которая выглядит ужасно.
  • 2
    На самом деле вы не делаете. Более поздние версии VB (2010 и более поздние, я думаю?) Не требуют _ во многих случаях, включая пример, показанный здесь.
3

Вы могли бы (должны?) поместить строку в файл-ресурс (например, "Мой проект" /Ресурсы), а затем получить его с помощью

 Dim a = My.Resources.Whatever_you_chose
2

вы можете использовать XML для этого, например

dim vrstr as string = <s>
    some words
    some words
    some
    words
</s>
1

в Visual Studio 2010 (VB NET), я пробую следующее и отлично работает

Dim HtmlSample As String = <anything>what ever you want to type here with multiline strings</anything>

dim Test1 as string =<a>onother multiline example</a>
0

Используйте vbCrLf или vbNewLine. Он работает с MessageBoxes и многими другими проверенными мной элементами управления.

Dim str As String
str = "First line" & vbCrLf & "Second line"
MsgBox(str)
str = "First line" & vbNewLine & "Second line"
MsgBox(str)

Он отобразит два одинаковых MessageBoxes с двумя строками.

0

Если вам нужен XML-литерал в VB.Net с переменной строки, вот как вы это сделаете:

<Tag><%= New XCData(T.Property) %></Tag>
  • 0
    Обратите внимание, почему вы упоминаете XML-литерал здесь, но не видите XML, упомянутый в исходном вопросе.
0

Доступно в Visual Basic 14 как часть Visual Studio 2015 https://msdn.microsoft.com/en-us/magazine/dn890368.aspx

Но еще не поддерживается R #. Хорошая новость - скоро они будут поддержаны! Пожалуйста, проголосуйте Youtrack, чтобы уведомить JetBrains, в котором они вам также нужны.

-2

Поскольку это проблема чтения, я использовал следующий код:

MySql = ""
MySql = MySql & "SELECT myTable.id"
MySql = MySql & " FROM myTable"
MySql = MySql & " WHERE myTable.id_equipment = " & lblId.Text
  • 1
    Это плохо. Вы только что создали 4 экземпляра строки
  • 0
    Я унаследовал устаревший код VB6, который я должен перенести на VB.NET, который полон этих! :( В этом случае я предпочитаю жертвовать производительностью, чтобы поддерживать читабельность.
Показать ещё 2 комментария
-9

Нет, VB.NET пока не имеет такой возможности. Он будет доступен на следующей итерации VB (визуальный базовый 10), однако (ссылка)

  • 0
    Вы уверены? Я знаю, что они позволят многострочные операторы, но они также позволят многострочные строки ? Я имею в виду "привет <newline> мир"?
  • 1
    Удаление символа продолжения строки и многострочных буквенных строк - это разные особенности.
Показать ещё 1 комментарий
-16

если он похож на С# (у меня нет установленного VB.Net), вы можете префикс строки с помощью @

foo = @"Multiline
String"

Это также полезно для таких вещей, как @ "C:\Windows\System32 \" - он по существу отключает экранирование и включает многострочный.

  • 31
    Это не похоже на C #. Это не работает

Ещё вопросы

Сообщество Overcoder
Наверх
Меню