如何将 SQL 字符串格式化为格式良好且更易于阅读的可读代码块

Question

当我编写构建动态 SQL 语句的代码时，我经常使用查询构建器工具（例如 MS Access 提供的工具）来生成语句的基础，然后我将在我的代码中使用它。

但是，如果此 SQL 语句的格式正确，则阅读代码会容易得多。任何人都可以提供有关如何最好地将本质上是一个很长的无格式 SQL 语句并将其转换为一个漂亮的文本字符串或一个更易于阅读的漂亮代码块的建议。

Answer 1

我过去使用过这种技术，这是最好的方法吗？

关键是：

A.使用下面的“aa”程序，让阅读变得更容易。

B.如果您使用查询构建器（如在 MS Access 中）构建 SQL 字符串，最好配置一个实用程序来获取构建的 SQL 并重新格式化它，以便生成的 SQL 看起来与下面的完全一样。 （我用的是 www.sqlinform.com 但还有其他的，或者你可以手动做）

C.通过在每一行之前添加 vbCrLf，当 SQL 字符串在 VBA 中构建时，生成的字符串可以输出到即时窗口，以便于阅读，因为它会有线刹车并很好地排列。 （这不是火箭科学）

Public Sub aa(ByRef a As String, ByVal b As String)
    ' This is deliberately not a function, although it behaves a bit like one
    a = a & vbCrLf & b

End Sub


' The function is called in code like this:

Dim a as string 

a = ""
aa a, "    SELECT CUR.txtLevel      AS [Current]  "
aa a, "         , NLPMi.strFullName AS [Full Name]  "
aa a, "         , NLPMi.DOB         AS [Birthday]  "
aa a, "         , NLPMi.Surname     AS [Surname Name]  "
aa a, "         , TOOLS.txtWCMTool "

aa a, "      FROM ( ( ( tblPeopleWCMSKILLSByYear AS SKILLS"
aa a, "                 LEFT JOIN tblSkillLevels AS CUR  "
aa a, "                        ON SKILLS.bytCurrentID = CUR.atnSkillLevelID
aa a, "               ) "
aa a, "              INNER JOIN [qrylstNames-LPMi] AS NLPMi  "
aa a, "                      ON SKILLS.intPeopleID = NLPMi.atnPeopleRecID
aa a, "             )"
aa a, "            INNER JOIN tblWCMTools AS TOOLS "
aa a, "                    ON SKILLS.intWCMSkillID = TOOLS.atnWCMToolID"
aa a, "           ) "

aa a, "     WHERE ( ( (SKILLS.bytYearID) = YEAR(DATE())-2012 )  "
aa a, "           AND CUR.txtLevel   >= " & MyVariable1 & "  "
aa a, "           AND TOOLS.txtWCMTool = '" & MyVariable2 & "'"
aa a, "           )  "

aa a, "  ORDER BY NLPMi.strFullName"
aa a, "        ", " & MyVariable3 & ""

aa a, "  ;"

请注意：

1. 表格连接的括号对齐

2. 我使用大写别名来强化它们是别名，以便它们脱颖而出

1234563改变它的构建方式）

3. 在 SELECT、ORDER BY 和 GROUP BY 子句中，我倾向于将列之间所需的逗号放在同一行的列名前面。

4. 我不喜欢数据库表在其名称中包含类型，即 strFullName。但是，这不是我的架构！

哈维