6

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

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

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

我的代码对一个人来说很乱,对于不熟悉 VBA 的人来说是无法理解的:

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

此外,这没有奏效:

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

你能告诉我为什么吗?

提前致谢。

4

3 回答 3

10

这:

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

是您发布的内容,但您需要添加额外的引号才能添加文字引号:

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

字符串中的双引号是您要查找的内容。

aVar = "This: "" is a literal quotation mark"
于 2012-11-28T01:09:15.233 回答
6

不久前,我从 MS (旧vbCRLF)中获取了一个页面,并将我需要的任何“棘手”字符定义为代码顶部的字符串......

Dim vbDblQuote As String
vbDblQuote = Chr(34)

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

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

这使代码更具可读性,也有助于避免“错误引用错误”

于 2015-02-13T19:29:36.123 回答
0

如果我使用 Write 命令输出到文件,我会发现相同的行为。任何双引号都会重复。

但是,如果您构造字符串,然后使用 Print 命令输出到文件,则不会发生这种情况,并且一切都按预期工作。

于 2017-06-06T19:55:18.757 回答