Sorry I forgot the "Set" on Set KedaTransparent1.Picture = LoadPicture("C:\path\file.bmp")