例如：command1.caption=1
      command2.caption=2      
      command3.caption=3
      command4.caption=4
用for i=1 to 4
     .....
  endfor

FOR I=1 TO 4
    CMD=[COMMAND]+TRANSFORM(I)
    THISFORM.&CMD..CAPTION=TRANSFORM(I)
ENDFOR

谢了，老大。你的回贴太急时了，太快了。

非和老大对着干！
local lnI，lcI
with thisform
FOR lnI=1 TO 4
    lcI=alltrim(str(lnI))
    .command&lcI..CAPTION=lcI
ENDFOR
endwith

好，掐起来。

不用宏替换＆如何写呢？

命令按钮组的代码好写，看下BUTTONS属性，你就应该能写出来代码了。

你们看清楚他1楼写的什么，给Caption赋数值型数据？

看清楚了，也明白他的意思，所以我们用的是字符变量。