'A
Dim c As Color = Color.Red
Label1.Text = String.Format("#{0:X2}{1:X2}{2:X2}", c.R, c.G, c.B)
'B
Label1.BackColor = Color.Green
Label1.BackColor = ColorTranslator.FromHtml("#00FF00")
'C
Label2.ForeColor = Color.FromArgb(RGB(256, 0, 0))
'D
Label1.BorderColor = Color.FromName("#0000FF")
Dim c As Color = Color.Red
Label1.Text = String.Format("#{0:X2}{1:X2}{2:X2}", c.R, c.G, c.B)
'B
Label1.BackColor = Color.Green
Label1.BackColor = ColorTranslator.FromHtml("#00FF00")
'C
Label2.ForeColor = Color.FromArgb(RGB(256, 0, 0))
'D
Label1.BorderColor = Color.FromName("#0000FF")
浙公网安备 33010602011771号