如何在VBA的DASL查询中正确使用字符串变量？

我完全懂你遇到的困扰——在DASL查询里直接写[appointmentToFind]，VBA根本不会把它当成变量解析，只会把它当作普通的字符串文本处理。要让变量生效，得用VBA字符串拼接的方式，把变量的实际值直接插入到查询语句里才行。

错误原因 #

你当前的写法中，[appointmentToFind]是查询字符串的一部分，VBA没有内置的语法能识别这种括号包裹的变量引用，所以它只会原封不动地把这段文本发送给DASL引擎，自然匹配不到你想要的内容。

正确的写法 #

你需要把变量值和DASL的SQL语法拼接在一起，同时注意LIKE操作符的通配符%和引号的正确使用：

Const PropTag As String = "http://schemas.microsoft.com/mapi/protag/"
Dim appointmentToFind As String
appointmentToFind = "会议" ' 替换成你的实际变量值

' 拼接变量到DASL查询中，添加LIKE需要的通配符
strRestriction = "@SQL=" & Chr(34) & PropTag & "0x0037001E" & Chr(34) & " LIKE '%" & appointmentToFind & "%'"

关键细节说明 #

1. 通配符处理：DASL的LIKE语法使用%作为任意字符的通配符，所以我们把变量值放在%中间，实现模糊匹配。
2. 引号嵌套：用Chr(34)（即双引号）包裹属性标签，用单引号包裹匹配的字符串内容，这样能避免引号冲突，确保语法合法。
3. 特殊字符转义：如果你的appointmentToFind变量值里包含单引号，会导致查询语法错误，这时候可以先转义单引号：

   appointmentToFind = Replace(appointmentToFind, "'", "''")
   

微软文档里的示例大多用硬编码字符串，所以没专门提及变量拼接的场景，但本质上就是遵循VBA的字符串拼接规则，把变量值嵌入到DASL的SQL结构里就可以了。

内容的提问来源于stack exchange，提问作者Jérémie Gamba