Llenar combos

[wiro]

Hola amigos, necesito de su ayuda, estoy queriendo llenar los combos de un formulario desde una clase, es decir tengo varios formularios y ene stos se tengo los mismo combos que en otros, siendo asi pense en creear una clase con un metodo al para desde este llenar los combos de diferentes formularios haciendo el llamado desde el load de cada formulario a la clase.

por ejmeplo

aca estoy en el load de un formulario y llamo a la clase BuscarCombos y al metodos de esta BuscarCiudad, esto me llena el combo para este formulario, pero si se fijan tengo que pasarle el nombre del formulario, si llamo al metodo desde otro formulario ya no me funciona por que no es el mismo formulario.

La idea era crear un metodo al que pudiera llamar desde cualquier formulario para llenar un combo

Private Sub frm_Reportes_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
BuscarCombos.BuscarCiudad()
End Sub

El codigo de ese metodo es el siguiente...

Public Sub BuscarCiudad()

strSQL = "SELECT ID_Ciudad, Xdescripcion FROM maCiudades"

cnSQL = New SqlConnection(CreateConection.ConnectionString)
cnSQL.Open()

cmSQL = New SqlCommand(strSQL, cnSQL)
drSQL = cmSQL.ExecuteReader()

frm_BuscarTarea.cboQuien.Items.Clear()
Try

Do While drSQL.Read()

objListItem = New ListItem(drSQL.Item("dNombre").ToString(), _
CInt(drSQL.Item("ID_Usuario")))
frm_BuscarTarea.cboCiudad.Items.Add(objListItem)
Loop

Catch ex As Exception
MessageBox.Show(ex.Message)
End Try

drSQL.Close()
cnSQL.Close()
cmSQL.Dispose()
cnSQL.Dispose()

End Sub

bueno Gracias.... espero y me puedan ayudar