Muchas gracias por contestar.
El codigo de arriba, es de la clase, y este es de la formulario; lo inclui en el load,
Cita: Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim obj As New conexiones
obj.llenarcombo("select distinct CVE_ENT from mgn.TBL_ENTIDAD", ComboBox1)
'obj.llenarcombo("select cve_ent from tbl_entidad", ComboBox1)
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim obj As New conexiones
obj.llenarcombo("select CVE_MUN from mgn.TBL_MUN_NAC where CVE_ENT= " & ComboBox1.Text & " ", ComboBox2)
End Sub
End Class
con este codigo me hace los combos; pero solo de lagunas tablas y me marca error rn fill de la class; pero si le doy ejecutar nuevamente realiza los combos. :(