Private Sub frmRegAsam_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'load de colores' Dim ColorList As New ArrayList() Dim colorType As Type = GetType(System.Drawing.Color) Dim propInfoList As PropertyInfo() = colorType.GetProperties(BindingFlags.[Static] Or BindingFlags.DeclaredOnly Or BindingFlags.[Public]) For Each c As PropertyInfo In propInfoList Me.cboVotante.Items.Add(c.Name) Me.cboSuplente.Items.Add(c.Name) Next End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)