VBA中的引号

Question

在我当前的VBA代码中,我有一个查询,我在其中使用在我的Chr(34)一些变量之间加上引号.

我想知道这有什么替代方案.这是一个简单的问题,我知道,但我没有成功重复这样的引号

" &变量字符串在这里& "

我的代码对于一个人而言是混乱的,对于不熟悉VBA的人来说是不可理解的:

comboService = Chr(34) & Me.Combo8.Value & Chr(34)

此外,这没有奏效:

comboService = """" & Me.Combo8.Value & """"

你能告诉我为什么吗？

提前致谢.

Answer 1

这个:

comboService = """ & Me.Combo8.Value & """

是你发布的,但你需要添加一个额外的引号,以添加一个文字引号:

comboService = """" & Me.Combo8.Value & """"

字符串中的双引号是您正在寻找的.

aVar = "This: "" is a literal quotation mark"

Answer 2

我从MS(旧vbCRLF)那里拿了一页,然后在我的代码顶部定义我需要的任何"棘手"字符作为字符串......

Dim vbDblQuote As String
vbDblQuote = Chr(34)

现在,您可以在构建字符串时使用该伪常量...

strMyString = "Just another string " & vbDblQuote & "with quotes" & vbDblQuote & "!"

这使代码更具可读性,还有助于避免"错误引用的引用错误"