coreldraw vba FindShapes方法 Recursive参数含义
vba写如下代码:Public Sub Test() Dim str1 As String str1 = "@type='" & "rectangle" & "'" Application.ActivePage.Shapes.FindShapes("", 0, False, str1).CreateSelectionEnd Sub[bool Recursive = true/false Recursive作用:指定是否遍历所有对象]Recursive =...



