将连接的VB.NET字符串文字转换为多行字符串

时间:2016-04-14 12:55:41

标签: vb.net visual-studio-2015 pretty-print

注意:这个问题不是关于VB.NET本身,而是关于Visual Studio 2015 Basic编辑器的特定功能。

我有一些看起来像这样的遗留代码:

Dim someText =
    " a " &
    " AND b " &
    " AND cd " &
    " AND efg " &
    " AND h "

由于Roslyn在VB中引入了multi-line string literals,我想将其转换为:

Dim someText =
    " a 
      AND b 
      AND cd 
      AND efg 
      AND h "

(我知道这两者并不完全等效,因为第二个包含额外的换行符和空格。这很好。让我们假设内容类似SQL或HTML,其中有额外的空格没关系。)

现在我的方法如下:首先我block-select起始引号(第一个除外)并用空格替换它们:

Dim someText =
   " a " &
     AND b " &
     AND cd " &
     AND efg " &
     AND h "

然后我点击a行来修复尾随引号, poof 会发生以下情况:

Dim someText =
    " a " &
      And b " &
      AND cd " &
      AND efg " &
      AND h "

第一个"和"的大写搞砸了。

我明白为什么会这样。我甚至filed a bug report来修复类似的问题。不幸的是,修复(显然已经进入VS 2015 Update 2)只有在报价总数为奇数的情况下才有用,这不是这里的情况。

有没有人找到一种解决方法,在没有Visual Studio搞乱字符串内容的情况下,将大块连接字符串重新格式化为多行字符串文字?我知道我可以全局转换漂亮的格式(工具/选项/文本编辑器/基本/高级),但是有更好的解决方案吗?

1 个答案:

答案 0 :(得分:7)

您可以使用“查找和替换”。启用正则表达式:

enter image description here

并使用此表达式:

" &\r\n\s*"

这将匹配一行末尾的引号和&符号,后跟新行和任何空格以及下一行开头的引号:

enter image description here

然后更换:

\r\n

用新行替换匹配的文本。

如果要在每行的开头保留空白,请使用捕获组(括号)在查找表达式中捕获它:

" &\r\n(\s*)"

并使用$1

将其重新放入替换中
\r\n$1

enter image description here