MSSQL到VB.NET的转换

Question

我正在研究将T-SQL过程转换为VB.NET代码的项目，并且我一直在考虑如何在VB.NET中编写简洁明了的内容。

例如，这是T-SQL：

insert into X(
 column1, 
 column2, 
 ....., 
 column100) 
select 
 column1, 
 column2, 
 ....., 
 column100 
 from Y 

我应该如何将该语句转换为VB.NET？ 如果我使用字符串生成器，它将类似于：

Dim sb As New StringBuilder()
With sb
    .Append("Insert into x(")
    .Append("column1,")
    .Append("column2,")
    .Append("...,")
    ......
End With

代码太长。 有没有更好的选择？

Answer 1

抱歉，我没有信誉可以作为“评论”，但是根据我的经验，LINQ在缩短SQL过程方面给了我很大帮助。

https://msdn.microsoft.com/en-us/library/bb386946(v=vs.110).aspx

Answer 2

不幸的是，由于没有像C＃这样的逐字字符串文字，您可以这样编写：

string insertSQL = @"
insert into X(
 column1, 
 column2, 
 ....., 
 column100) 
select 
 column1, 
 column2, 
 ....., 
 column100 
 from Y 
";

您可以使用XML文字来获得类似的行为：

Dim insertSQL As String = <![CDATA[ 
insert into X(
 column1, 
 column2, 
 ....., 
 column100) 
select 
 column1, 
 column2, 
 ....., 
 column100 
 from Y 
]]>.Value

详细的经典方法是使用：

Dim insertSQL As String = "insert into X( " & vbCrLf &
                          "column1, " & vbCrLf &
                          "column2,  " & vbCrLf &
                          ".....,  " & vbCrLf &
                          "column100)  " & vbCrLf &
                          "select  " & vbCrLf &
                          "column1,  " & vbCrLf &
                          "column2,  " & vbCrLf &
                          ".....,  " & vbCrLf &
                          "column100  " & vbCrLf &
                          "from Y  "