6楼的方法值得欣赏和学习!因为,如果把整表的字段全部放在表格上,这样做是可行的。很好用。
但有时候会出现特殊情况:比如:grd 列数量小于表的列数,并且排序次序并不和表列完全一致时,
可能不会出现预期效果,或出错等。因此,在你的基础上,做了个小扩展,扩大了一点通用范围:
不再依赖原表,只与 grd 结构有关.比如:
with thisform.grid1
FOR I=1 TO .columncount
cmm=".column"+alltrim(str(i))+".controlsource"
ct=&cmm
.Columns(I).DynamicBackColor="IIF(!empty(&ct),RGB(128,255,128),RGB(255,255,255))"
next
endwith (仅供参考,不当之处敬请指正)