elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


 


Tema destacado: Sigue las noticias más importantes de elhacker.net en ttwitter!


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General (Moderadores: Littlehorse, Eleкtro)
| | |-+  Trabajar con colores en Visual Basic
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Trabajar con colores en Visual Basic  (Leído 51,279 veces)
NekroByte


Desconectado Desconectado

Mensajes: 638


Ver Perfil WWW
Trabajar con colores en Visual Basic
« en: 4 Diciembre 2004, 12:58 »

Texto extraido de las librerías Microsoft Developer Network:

Visual Basic utiliza un sistema coherente para todas las propiedades de color y los métodos gráficos. Un color se representa mediante un entero de tipo Long y este valor tiene el mismo significado en todos los contextos en los que se especifica un color.

Especificar colores en tiempo de ejecución.


Hay cuatro maneras de especificar un valor de color en tiempo de ejecución:

   *Usar la función RGB.

   *Usar la función QBColor para elegir uno de los 16 colores de Microsoft QuickBasic.

   *Usar una de las constantes intrínsecas enumeradas en el Examinador de objetos.

   *Escribir un valor de color directamente.

Esta sección describe el uso de las funciones RGB y QBColor como formas sencillas de especificar colores. Para obtener información acerca del uso de constantes para definir color o la escritura directa de valores de color, vea "Usar las propiedades de color", más adelante en este mismo capítulo.

Usar la función RGB.

Puede usar la función RGB para especificar cualquier color.

Para usar la función RGB para especificar un color


   *Asigne a cada uno de los tres colores básicos (rojo, verde y azul) un número entre 0 y 255. 0 denota la intensidad mínima y 255 la máxima.

   *Asigne estos tres valores como entradas de la función RGB, con el orden rojo-verde-azul.

   *Asigne el resultado a la propiedad de color o al argumento de color.

Todos los colores se pueden producir mediante la combinación de uno o varios de los colores básicos. Por ejemplo:

Código:
' Establece el fondo a verde.
Form1.BackColor = RGB(0, 128, 0)
' Establece el fondo a amarillo.
Form2.BackColor = RGB(255, 255, 0)
' Establece un punto a azul oscuro.
PSet (100, 100), RGB(0, 0, 64)



RGB (Función)  

Devuelve un número entero tipoLong que representa un valor de color RGB.

Sintaxis:
RGB(red, green, blue)

La sintaxis de la función RGB consta de los siguientes argumentos:

red Obligatorio. tipo Variant (Integer). Número en el intervalo de 0-255, ambos inclusive, que representa el componente rojo del color.
green Obligatorio; tipo Variant (Integer). Número en el intervalo de 0-255, ambos inclusive, que representa el componente verde del color.
blue Obligatorio; tipo Variant (Integer). Número en el intervalo de 0-255, ambos inclusive, que representa el componente azul del color.


Comentarios

Los métodos de aplicación y las propiedades que aceptan una especificación de color esperan que ésta sea un número que represente un valor de color RGB. Un valor de color RGB especifica la intensidad relativa de rojo, verde y azul que hacen que se muestre un color determinado.

El valor de cualquier argumento para la función RGB que sea superior a 255 se considerará como 255.

La siguiente tabla muestra algunos colores estándar y sus valores de rojo, verde y azul:

Negro = 0 0 0
Azul = 0 0 255
Verde = 0 255 0
Cián = 0 255 255
Rojo = 255 0 0
Magenta = 255 0 255
Amarillo = 255 255 0
Blanco = 255 255 255



QBColor (Función)
Devuelve un tipoLong que representa el código de color RGB correspondiente al número de color especificado.

Sintaxis

QBColor(color)

Elargumento color es un número entero entre 0-15.

Valores

El argumento color toma los siguientes valores:
 
0 Negro
1 Azul
2 Verde
3 Aguamarina
4 Rojo
5 Fucsia
6 Amarillo
7 Blanco
8 Gris
9 Azul claro
10 Verde claro
11 Aguamarina claro
12 Rojo claro
13 Fucsia claro
14 Amarillo claro
15 Blanco brillante

Comentarios

El argumento color representa los valores de color que utilizan otras versiones de Basic (como Microsoft Visual Basic para MS-DOS y Basic Compiler). Comenzando por el byte menos significativo, el valor devuelto especifica los valores de rojo, verde y azul necesarios para establecer el color correspondiente en el sistema RGB que utiliza Visual Basic para Aplicaciones.

Ejemplo de la función QBColor

Este ejemplo utiliza la función QBColor para cambiar la propiedad BackColor del formulario transferido como MiFormulario al color indicado por CódigoColor. QBColor acepta valores enteros entre 0 y 15.

Código:
Sub CambiarColorFondo (CódigoColor As Integer, MiFormulario As Form)
   MiFormulario.BackColor = QBColor(CódigoColor)
End Sub



A continuación unas tablas de coloress RGB y Hexadecimal más completas:

http://www.trucos-pc.8k.com/coloreshtml.htm
http://eusalud.uninet.edu/Cursos/Html/tablargb.htm
http://www.arrakis.es/~wenceslao/CursoWeb/5/colores_hex.htm
http://www.terra.es/personal3/jose.diaz.rodri/rgb.html


« Última modificación: 26 Septiembre 2010, 21:02 por NekroByte » En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  
Powered by SMF 1.1.19 | SMF © 2006-2008, Simple Machines