Combo Flat en Visual Basic 6.0.

imagen principal Fecha de publicación: 26/10/2014

ADM_Combo es un control OCX realizado en Visual Basic 6.0. que nos permite crear un Combobox con estilo flat.

Como podéis ver en la imagen tiene una apariencia Flat totalmente configurable y las prestaciones respecto al propio de Visual Basic son bastante más significativas.
Su uso es bastante sencillo. Comenzaremos con la inserción de los elementos en el combo.

1) Inserción de elementos

ADMCombo1.additem ID,Texto,[Forecolor],[Icono]

DescripciónTipoObligatorio
IDEl identificador del elemento introducidoLong
TextoEl texto del elemento introducidoString
ForecolorEl color de texto del elemento introducidoLongNo
IconoImagen asociada del elemento introducido. Es preferible que sus dimensiones sean 16x16 píxelesStdPictureNo

2) Busqueda de elementos

Para buscar por un ID utilizaremos la función Buscar_ID

ADMCombo1.Buscar_ID 12

Para buscar por el índice de elementos introducidos utilizaremos la función Buscar_Indice

ADMCombo1.Buscar_Indice 7

Para buscar un texto en concreto tanto parcialmente como un texto completo utilizaremos la función Buscar_Texto

ADMCombo1.Buscar_Texto "prueba"

3) Devolución de los elementos señalados

Para devolver el identificador señalado del combo utilizaremos la función Devolver_ID_Señalado

n = ADMCombo1.Devolver_ID_Señalado

Para devolver el índice señalado del combo utilizaremos la función Devolver_Indice_Señalado

n = ADMCombo1.Devolver_Indice_Señalado

Para devolver el texto del elemento seleccionado del Combo utilizaremos la función Devolver_Texto_Señalado

Texto = ADMCombo1.Devolver_Texto_Señalado

4) Resto de Propiedades

DescripciónTipo
AlineaciónLa alineación de los elementos del Combo. Sus valores pueden ser Izquierda, Derecha o CentradoAlignmentconstants
Alto_IconoAlto máximo de los iconos si se introducen imágenes en los elementos del combo. Su valor por defecto es 16.Integer
BackColorColor de fondo de los elementos del ComboLong
BackColor_FondoColor de fondo del objetoLong
BorderColorColor de borde del ComboLong
ForeColorColor de texto del ComboLong
ListCountNúmero total de elementosLong
LockedActivación o desactivación del controlBoolean
Texto_NingunoSi introducimos un texto en esta propiedad, automáticamente se creará un elemento en el Combo con identificador 0String

5) Resto de funciones

DescripciónParámetros
ClearBorra todos los elementos del Combo-
Mover_ScrollPara mover manualmente el scroll de la ventana de los elementos desplegadosAbajo (Boolean)
Cantidad_movimiento (Integer)
Ocultar_DesplegablePara ocultar manualmente la lista desplegable del Combo-

6) Registro del Control

Para que funcione el control tendremos que registrarlo:

regsvr32 c:\carpeta_donde_se_haya_guardado\ADM_Combo.ocx

También se ha de registro el control MouseWheelTest.ocx el cual nos permitirá utilizar la rueda del ratón para navegar sobre los elementos del Combo. Esto se ha de hacer así ya que en su día no conseguí implementar esta funcionalidad en el control y tuve que utilizar este apaño.

regsvr32 c:\carpeta_donde_se_haya_guardado\MouseWheelTest.ocx

DESCARGAR ADM_COMBO.rar(1.353 descargas)

Si te gusta este artículo compártelo en las redes sociales

Comentarios

JUAN

22/02/2021 - 01:26:08

Responder

Buen control, pero creo que se queda corto cuando se carga una base de datos en el combobox. Creo que no se pueden cargar mas de 2000 registros.
Publicar un comentario

Introduzca un comentario

Nombre:
Comentario:
Introduce los números
de la imagen de arriba
Introducir

Si te gusta o te es útil esta página puedes hacer una donación para permitir su mantenimiento