Imports System.Drawing Dim kColor As KnownColor For kColor = KnownColor.AliceBlue To KnownColor.YellowGreen cmbColor.Items.Add(kColor) Next