如题。
查了一下，也看了一些其他高手的代码。一般说，如果要批量设置控件的属性，一般是使用SETALL(）来设置。但是，标签好像没有ＢＯＸ一说。我试图以编程的办法，对标签的属性进行设置，均告失败。也看了一下帮助文件，不知就里。可以人指点一下。谢谢！

但愿下面的代码对楼主有所帮助

效果图

谢谢你！我的意思是说当一个表单有若干个标签的时候，我如何一次性对这些标签更改属性。不仅是颜色属性的设置。

误会了，正在看

好像程序无法运行，好多变量找不到。
=ALines(Acolor,Strtran(cVar,Chr(9),""),Chr(13)+Chr(10))       （ cVar找不到）
 nColor=Evaluate("0x"+Substr(Acolor[lnI],2))                  参数无效
  lnRed = Mod(nColor,256)                                       （nColor找不到）
  lnBlue = Bitrshift(nColor,16)                                  （nColor找不到）
 .BackColor=Rgb(lnRed,lnGreen,lnBlue)                           (lnRed)
 =BindEvent(ThisForm.&oLabel,"MouseMove",ThisForm,"Mouse_Move")  文件不存在
运行结果，表单可以显示，内容空白。

附件运行正常　SDTA高

我这里无法运行

我是VFP8.0的环境

用表单的SetAll方法不可以吗？如：
thisform.SetAll("ForeColor",0xFF,"label")

我也这么认为！