Extraer el rojo, verde y azul ( RGB) componentes de un código de color en Visual Basic 6.0 ( VB6 ) es útil al convertir los formatos de datos de color entre los distintos programas . VB6 proporciona una función de " RGB " para convertir los colores de sus componentes rojo , verde y azul en un tipo de " larga " datos numéricos , pero carece de cualquier función incorporada para convertir en la otra dirección . Además , los códigos de color en VB6 se almacenan utilizando el formato little endian , es decir bytes se almacenan en la memoria en orden inverso. Extraer valores " RGB " de códigos de color mediante la adición de un subprograma para procesar y convertir los códigos de forma automática. Instrucciones
1
Abra el archivo VB6 en un editor , como Microsoft Visual Studio 6.0 .
2
Crear una subrutina para convertir un código de color VB6 a su color rojo, verde y los componentes azules añadiendo el siguiente código en su archivo :
Public Sub Hex2RGB ( lcolor como de largo, r As Byte , g As Byte , b As Byte )
HColor Dim As String < br >
Dim n As Byte
strHexVal dévil como secuencia
strHexVal = Hex $ ( lcolor )
strHexVal = Right ( ( strHexVal ) , 6)