Специальные символы - PullRequest
       6

Специальные символы

1 голос
/ 25 августа 2011

Я хочу написать простую программу на VBScript.В скрипте я вводю данные в переменную (строку).

Через некоторое время я хочу ввести "\ n", но вместо фактического \ n выводится \ n.

Как напечатать специальные символы

Ответы [ 4 ]

4 голосов
/ 25 августа 2011

VBScript поддерживает некоторые константы: -

  • vbLf эквивалентно "\ n"
  • vbCr эквивалентно "\ r"
  • vbCrLf эквивалентно "\ r\ n "

Вам нужно будет использовать конкатенацию строк, чтобы включить эти символы в окончательную строку

Dim s
s = "First Line"
s = s & vbCrLf & "Second Line"
s = s & vbCrLf & "Third Line"

и т. д.

Если у вас многоСтроки такого рода конкатенации могут быть очень медленными, вы можете переключиться на использование функции Join

ReDim a(2)
a(0) = "First Line"
a(1) = "Second Line"
a(2) = "Third Line"

Dim s : s = Join(a, vbCrLf)
1 голос
/ 28 августа 2011

Вы должны указать новую строку, используя константы VBScript или функцию Chr():

What                Constant  String using Chr    Don't use this
------------------- --------- ------------------- ----------------
Carriage return     vbCr      Chr(13)             "\r"
Line feed           vbLf      Chr(10)             "\n"
CR and then LF      vbCrLf    Chr(13) & Chr(10)   "\r\n"

Объединить это со строкой, которую вы пытаетесь разбить на разные строки.

Примеры:

s = "First line" & vbCrLf & "Second line"
s = "First line" & Chr(13) & Chr(10) & "Second line"
1 голос
/ 25 августа 2011

Вы должны добавить его с конкатенацией строк:

mystring = "stuff that comes first" & vbCrLf & "stuff that comes after"
1 голос
/ 25 августа 2011

символ \ n в скрипте vb равен vbcrlf (перевод строки каретки по vb) .. его эквивалент \ n \ r.

, вот простой скрипт.msgbox "Ping" & VBCRLF & "Pong"

...