Sección de códigos , trucos y ejemplos para visual basic


251 - Crear sombra 3d en controles

<Volver> - Anterior - Siguiente



 

Ejemplo que recorre los controles del formulario aplicando un efecto sombreado a los mismos

 

Parte del código e idea lo saqué de la web de Microsoft. El mismo mostraba como aplicar la sombra a un control. Yo le añadí algunas líneas para que lo haga en todos los controles del formulario: Textbox, botones, etc .. menos en los controles Label, Shape y Line (en este último genera un error asi como está plantedo el ejemplo, ya que no posee la propiedad Left y Top, para añadir esto hay que utilizar los valores x1, y1 de la línea) y comprobar que sea un control de tipo Line con la instrucción TypeOf

También le agregué para que pueda dibujar la sombra en controles que estén dentro de controles PictureBox, ya que si no no las dibujaba, porque tomaba como contenedor al formulario

 

vista del formulario de ejemplo pra aplicar la sombra3d

 

Nota: si los controles están contenidos en un control Frame, la sombra no se verá ya que se dibuja en el formulario o control Picture ( Contenedor del control )

Para indicar el color y valor para el ancho del sombreado, cambiar el valor a las constantes.

 

Código fuente en un Form:

 


Recursos vb 6.0 - Enlaces relacionados



Buscar en Recursos vb