如何向用户vb.net显示预定义选项板
我想做一个表单,用户可以在其中选择一个预先确定的可行选项板来在图表中使用,我该怎么做 我不希望用户使用colorDialog按颜色选择颜色,而是选择整个调色板。如果可能的话,我希望表单像一个连续的条一样显示它如何向用户vb.net显示预定义选项板,vb.net,charts,color-picker,palette,Vb.net,Charts,Color Picker,Palette,我想做一个表单,用户可以在其中选择一个预先确定的可行选项板来在图表中使用,我该怎么做 我不希望用户使用colorDialog按颜色选择颜色,而是选择整个调色板。如果可能的话,我希望表单像一个连续的条一样显示它 谢谢我搜索了很多,但没有找到,即使这在很多节目中很常见。最后,在漫长的过程中,我向任何可能感兴趣的人添加了代码 Private cBerry() As Color = {Color.BlueViolet, Color.MediumOrchid, Color.RoyalBlue, Color
谢谢我搜索了很多,但没有找到,即使这在很多节目中很常见。最后,在漫长的过程中,我向任何可能感兴趣的人添加了代码
Private cBerry() As Color = {Color.BlueViolet, Color.MediumOrchid, Color.RoyalBlue, Color.MediumVioletRed, Color.Blue, Color.BlueViolet, Color.Orchid, Color.MediumSlateBlue, Color.FromArgb(192, 0, 192), Color.MediumBlue, Color.Purple}
.
.
.
Private cPastel() As Color = {Color.SkyBlue, Color.LimeGreen, Color.MediumOrchid, Color.LightCoral, Color.SteelBlue, Color.YellowGreen, Color.Turquoise, Color.HotPink, Color.Khaki, Color.Tan, Color.DarkSeaGreen, Color.CornflowerBlue, Color.Plum, Color.CadetBlue, Color.PeachPuff, Color.LightSalmon}
cBerryLbls = {Label1, Label2, Label3, Label4, Label5, Label6, Label7, Label8, Label9, Label10, Label11}
.
.
.
cPastelLbls = {Label12, Label13, Label14, Label15, Label16, Label17, Label8, Label19, Label20, Label21, Label22, Label23, Label24, Label25, Label26, Label27}
labls = {cBerryLbls,... cPastelLbls}
colores = {cBerry,... cPastel}
Dim labs As Label()
Dim colori As Color()
For i As Integer = 0 To colores.Length - 1
labs = labls(i)
colori = colores(i)
For j As Integer = 0 To labs.Length - 1
labs(j).BackColor = colori(j)
Next
Next