vsSurfacePpg.vsSurfacePpg.1 = s 'vsSurfacePpg Class'
		CLSID = s '{99236580-c796-11d0-a065-00a024d5bd45}'
	vsSurfacePpg.vsSurfacePpg = s 'vsSurfacePpg Class'
		CurVer = s 'vsSurfacePpg.vsSurfacePpg.1'
	NoRemove CLSID
		ForceRemove {99236580-c796-11d0-a065-00a024d5bd45} = s 'vsSurfacePpg Class'
			ForceRemove 'Programmable'
			InprocServer32 = s '%MODULE%'
				val ThreadingModel = s 'Apartment'