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

注意：这个问题不是关于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 "

然后我点击一行来修复尾随引号,并发生以下情况：

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

第一个“和”的大写被搞砸了.

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

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

您可以使用查找和替换.启用正则表达式：

并使用此表达式：

" &\r\n\s*"

这将匹配一行末尾的引号和&符号,然后是换行符和任何空格以及下一行开头的引号：

然后更换：

\r\n

用新行替换匹配的文本.

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

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

并使用1美元将其放回更换中：

\r\n$1