> Hi,

> I'm following an example in VB6 "Managing Multiple Color Palettes" to
> change a palette in a PictureBox

> Here's my code.  It does nothing.

> Public Sub Make_Fake_BMP()

> Dim Pic As StdPicture

> Set Pic = LoadPicture()
> Set Pic = LoadPicture( "test.bmp")

> frmJOHO.Palette = Pic
> frmJOHO.PaletteMode = vbPaletteModeCustom
> frmJOHO.Refresh

> Set Pic = LoadPicture()
> End Sub

> frmJOHO is filled with a PictureBox called PicJOHO which has already
> been loaded with a 256-color bitmap using PaintPicture. Test.bmp has a
> different palette than the one loaded in PicJOHO. I want the palette
> used to display PicJOHO to change to the one in test.bmp.

> Seems like I'm just doing as the example says.  Any ideas?

> TIA
> Duncan

> I've never done this before, but I think that the repeated line "Set Pic =
> LoadPicture()" may empty the variable effectively, so that it is not
> unexpected that it does nothing.

> Just remove this line twice and it may work.