Archive for the ‘Colors’ Category

How to generate random colors in vb.net

Module RandomColors

Public Function GetRandomQBColor() As System.Drawing.Color

Dim rndom As New Random

Dim color_num As Integer = rndom.Next(0, 15)

Return System.Drawing.Color.FromArgb(QBColor(color_num) + &HFF000000)

End Function

Public Function GetRandomRGBColor() As System.Drawing.Color

Dim rndom As New Random

Return System.Drawing.Color.FromArgb(255, rndom.Next(0, 255), rndom.Next(0, 255), rndom.Next(0, 255))

End Function

End Module

, ,

No Comments


Convert color to string

To convert a color to a string use the ColorConverter class but this can be access through TypeConverter class;

  1. Dim myColor as Drawing.Color = Color.Red
  2.  
  3. Dim clor As System.ComponentModel.TypeConverter = System.ComponentModel.TypeDescriptor.GetConverter(myColor)
  4. dim ColorName as string
  5.  
  6. ColorName = clor.ConvertToString(Color.Red)

, ,

1 Comment


Convert color from string

To convert a color from a string use the ColorConverter class but this can be access through TypeConverter class;

  1. Dim myColor as Drawing.Color
  2.  
  3. Dim clor As System.ComponentModel.TypeConverter = System.ComponentModel.TypeDescriptor.GetConverter(GetType(Drawing.Color))
  4.  
  5. myColor = clor.ConvertFromString("Blue")

MyColor variable is  now ready to use.

, ,

No Comments



SetPageWidth