Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/03/2008, 17:42
franko1809
 
Fecha de Ingreso: enero-2008
Ubicación: Lima - Perú
Mensajes: 1.127
Antigüedad: 17 años, 3 meses
Puntos: 10
Crear un funcion global o clase

tengo una funcion que llena un datacombo con registros de una tabla de mi bd el codigo lo necesito en varios formularios como hago para poder utilizarlo en cualquier parte del proyecto aqui dejo mi funcion

Function LlenarCliente()
Set rsCateg = New Recordset
rsCateg.Open "SELECT * FROM categoria", dbConex, adOpenStatic, adLockOptimistic
dtcCategoria.BoundColumn = "CodCat"
dtcCategoria.ListField = "NomCat"
Set dtcCategoria.RowSource = rsCateg
End Function