VB6 Palette color to RGB

vb6palettecolortoRGB.cs

//lbcolor: color en bd (definido en paleta de vb6 designer)
int lbcolor = 255;

int pBlue = 0;
int pRed = 0;
int pGreen = 0;

if (lbcolor < 256) {
	pRed = lbcolor;
	pBlue = 0;
	pGreen = 0;
	//exit sub
}
else{
	if (lbcolor < 65280) {
		pGreen = (int)(lbcolor / 256);
		pRed = lbcolor - pGreen * 256;
		pBlue = 0;
		//exit sub
	}
}
pBlue = (int)(lbcolor / 65536);
pGreen = (int)((lbcolor - pBlue * 65536) / 256);
pRed = lbcolor - pGreen * 256 - pBlue * 65536;
//output 
string output = System.Drawing.ColorTranslator.ToHtml(System.Drawing.Color.FromArgb(pRed,pGreen,pBlue));