很感谢tonydeng的热情回答，因为我对宏替换这块理解的不是很到位，想借此机会再请教一下。

宏本质上是一种文本替换机制，与解释器的实现有关，有些版本的解释器有bug，如此而已。

向tonydeng学习

For lnI=1 To Fcount()
    Replace (Field(lnI)) With "1"
EndFor

Create Cursor Dd (Th1 C(1),Th2 C(1),Th3 C(1),Th4 C(1))
Append Blank && 是不是少了这行代码
For lnI=1 To 4
    Cc=Transform(lnI)
    Replace Th&Cc With "1"
EndFor 
Browse 

[ 本帖最后由 sdta 于 2014-12-3 00:44 编辑 ]

如果表中只有这4个字段，可以用14楼的方法，也可以用数组的方法，通过Insert Into 命令将数据添加到表中

不是的，可能tonydeng说的对，我的不是个空表，只是这几个字段是空的，然后后面的就如同你所写的那样，没替换出来。我用的是vf9sp1，不知道是不是和这个有关。

replace record 第几条记录

原因很简单， 你没有移动记录指针，所以结果理论上是修改了第一条记录的值。