0

我在 VBA 代码中有一些 Sql 查询，这是一行代码的示例：

strQry = strQry & Worksheets("Data").Cells(9, 7) & """, " & _

我需要在此行末尾添加注释。像这样：

strQry = strQry & Worksheets("Data").Cells(9, 7) & """, " & _ 'comment hjjkk

我通常使用撇号进行评论，但该行不接受该字符。请指教。另外，如果可能的话，我需要在该行的末尾添加评论。谢谢！

4

4 回答 4

5

这与 SQL 查询本身无关，您试图在续行后添加注释，这是不允许的。

来自MSDN 文档的评论：

注释不能跟在同一行的续行序列之后。

于 2012-11-01T14:14:21.033 回答
3

使用换行符_ ，您不能对该行进行评论，因为对于 VB，该行还没有停止（这是一项提高我们程序员可读性的功能）。习惯于在完整字符串之前或之后发表评论

或者，您可以分部分构建字符串，并在每个部分之后添加注释：

strQry = strQry & Worksheets("Data").Cells(9, 7) 'comment 1

strQry = strQry & ", " & <next part> 'comment2

ETC...

于 2012-11-01T14:15:30.593 回答
2

行尾的下划线向 VB 表示代码在下一行继续。下划线后面不能放任何东西。如果您需要在行尾添加注释，则需要重组代码以结束该行，放置注释并在下一行继续字符串连接。

于 2012-11-01T14:15:11.807 回答
2

如果您这样做& _，则意味着您在下一行获得了代码，并且该指令尚未完成。因此，如果您在之后& _立即输入评论，就像您在指令中间插入评论一样

例如：

   myVar = 3 + 5 & _ 'comment at the wrong place
          +2

   =

   myVar = 3 +5 'comment at the wrong place + 2

所以你能做的就是

myVar = 3 + 5 'comment
myVar = myvar + 2

或者在你的情况下它看起来像这样

strQry = strQry & Worksheets("Data").Cells(9, 7) & """, " 'Comment
strQry = styQry &...
于 2012-11-01T14:15:01.440 回答