主题：[求助] 颜色赋值

If Tables("颜色")(0)("一级") Like "* ；" Then
    e.Form.Controls("ColorPicker1").Color = Color.FromARGB(Tables("颜色")(0)("一级"))
Else
    Dim s As String = Tables("颜色")(0)("一级") 
      e.Form.Controls("ColorPicker1").Color = Color. & s
End If

 

哪里错了，要怎么修改

此主题相关图片如下：002.png