如何遍历并赋值颜色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

一个简单案例，界面有4个标签控件，想遍历颜色数组后将颜色赋值

以下代码无效，请指正

Dim Cos() As String = {"red","blue","green","white"}

For i As Integer = 0 To cos.Length -1

e.Form.Controls("Label" & i+1).ForeColor = "Color." & cos(i)

方法调用失败，因为“Public Overrides Property ForeColor() As System.Drawing.Color”不能用这些参数调用:

与参数“value”匹配的参数无法从“String”转换为“Color”。

此主题相关图片如下：微信截图_20200504092018.png

主题：如何遍历并赋值颜色