CorelDraw VBA 在 CQL 中使用变量

Question

伙计们，我正在尝试在我的 cql 查询中使用变量

如果我使用以下内容，它会按预期工作，select所有对象都具有相同的 cmyk 颜色

ActivePage.Shapes.FindShapes(Query:="@fill.color = cmyk(100,0,0,0)").CreateSelection

我想使用数组中的变量来找到一个对象的颜色，select所有其他具有相同颜色的对象

我试过以下方法

 Dim a, b, c, d
 a = 100
 b = 0
 c = 0
 d = 0
 ActivePage.Shapes.FindShapes(Query:="@fill.color = cmyk(a,b,c,d)").CreateSelection

当我这样做时，出现以下错误

标识符'a'不是全局成员

任何想法是怎么回事

感谢任何帮助

标记

Answer 1

看起来这个问题的答案是转义字符串，并将值连接到查询中。

根据评论，这应该有效：

ActivePage.Shapes.FindShapes(Query:="@fill.color = cmyk(" & a & "," & b & "," & c & "," & d & ")").CreateSelection

CorelDraw VBA Using variables in CQL