Lista de colores aleatorios
Publicado por mar (1 intervención) el 08/06/2010 18:17:58
Hola tengo un DopDownList que necesito llenar con colores en forma aleatoria , primero lleno un ArrayList con los colores, pero luego al traerlos en el DropDownList me aparecen en hexadecimal
Dim color As Drawing.Color
For i = 0 To 50
color = Drawing.Color.FromArgb(Convert.ToInt32(autoRand.Next(240, 255)), Convert.ToInt32(autoRand.Next(240, 255)), Convert.ToInt32(autoRand.Next(240, 255)))
ALColores.Add(color)
Next
Dim elemento As ListItem
DDLColores.Items.Clear()
For i = 0 To NumeroTotalColores
color = ALColores.Item(i)
If color <> Nothing Then
elemento = New ListItem(color)
elemento.Attributes.CssStyle.Add(HtmlTextWriterStyle.BackgroundColor, color)
DDLColores.Items.Add(elemento)
End If
Saludos
Dim color As Drawing.Color
For i = 0 To 50
color = Drawing.Color.FromArgb(Convert.ToInt32(autoRand.Next(240, 255)), Convert.ToInt32(autoRand.Next(240, 255)), Convert.ToInt32(autoRand.Next(240, 255)))
ALColores.Add(color)
Next
Dim elemento As ListItem
DDLColores.Items.Clear()
For i = 0 To NumeroTotalColores
color = ALColores.Item(i)
If color <> Nothing Then
elemento = New ListItem(color)
elemento.Attributes.CssStyle.Add(HtmlTextWriterStyle.BackgroundColor, color)
DDLColores.Items.Add(elemento)
End If
Saludos
Valora esta pregunta
0