这种VBA代码如何Foxtable在MSWord中体现？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

这段代码的意思是要在WORD中的选定区域删除指定的字符：

If qwstr <> "" Then '删除表中的指定字符

arr = Split(qwstr, ",")

With _app.Selection

For i = 0 To arr.Length - 1

.Find.Text = arr(i)

.Find.Replacement.Text = ""

.Find.Execute Replace:=wdReplaceAll

output.show(arr(i))

End With

End If

但是执行时有这样的提示：

编译错误：方法参数必须在括号内

.Find.Execute Replace:=wdReplaceAll

这个代码的写法是VBA中的写法，我不清楚这样的情况在Foxtable中该如何写？

下述是VBA官方帮助文件的内容：

Replacement 对象代表查找和替换操作的替换条件。Replacement 对象的属性和方法对应于“查找和替换”对话框中的选项（单击“编辑”菜单中的“查找”或“替换”命令可显示该对话框）。

可通过 Find 对象使用 Replacement 对象。下列示例将所有单词“hi”替换为“hello”。由于 Find 对象是通过 Selection 对象访问的，所以当找到搜索条件时，会更改所选内容。

With Selection.Find
    .ClearFormatting
    .Text = "hi"
    .Replacement.ClearFormatting
    .Replacement.Text = "hello"
    .Execute Replace:=wdReplaceAll, Forward:=True, _
        Wrap:=wdFindContinue
End With

Replace Variant 类型，可选。指定执行替换的个数：一个、全部或者不替换。可取下列 WdReplace 常量之一。

WdReplace 可以是下列 WdReplace 常量之一：

wdReplaceAll

wdReplaceNone

wdReplaceOne

主题：这种VBA代码如何Foxtable在MSWord中体现？