Hola amigos, espero que me puedan ayudar. el codigo q tengo es este:

para cargar el combo:

Private Sub frmPersonas_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles...