Question

VB6批量改变窗体背景颜色及对应的字体颜色

我想加入一组更改窗口背景颜色及对应改变颜色的，可以更改4~105窗体的5个COMMAND。现在默认是黑色，LABEL的背景也是黑色，字体默认白色。我想做背景有黑，深蓝，紫，粉，白。满足下面几点。
1、更改背景颜色的按钮按一下就可以改变所有4~105窗体的背景颜色
2、更改每个背景颜色的同时每个FORM里的所有LABEL的背景颜色改变成相同颜色（但难点是每个FORM里LABEL数量不一，且未按顺序排列——比如没有LABEL15却有LABEL16）
3、当背景为黑（默认），深蓝，紫时，除下一条标出的LABEL号码外字体颜色为白色，粉和白时为黑色（默认）。
4、每个FORM中的LABEL10,34,35,36,37,38,39的字体颜色始终为黄色

Answer 1

1、更改背景颜色的按钮按一下就可以改变所有4~105窗体的背景颜色
2、更改每个背景颜色的同时每个FORM里的所有LABEL的背景颜色改变成相同颜色（但难点是每个FORM里LABEL数量不一，且未按顺序排列——比如没有LABEL15却有LABEL16）
3、当背景为黑（默认），深蓝，紫时，除下一条标出的LABEL号码外字体颜色为白色，粉和白时为黑色（默认）。
4、每个FORM中的LABEL10,34,35,36,37,38,39的字体颜色始终为黄色

Answer 2

1，首先添加模块。
2，在模块里编写以Public开头的过程，采用窗体对象为传址参数。
3，在该过程里，用For Each遍历窗体上每个控件，通过判断是否和目标控件进行属性设置。

Answer 3

改变一个就可以改变多个这和定义一个接口有多个实现是一样的道理吧

变成一样色的就写成一个通用方法改变，
多个类型的就封装几个控件，每个类型对应一种。

暂时想出这点