指定灰色应用到当前文本运行内容
builder.CreateFile("pptx")!varoPresentation=api.GetpresentationvaroSlide=oPresentation.getSlideByIndex0oSlide.RemoveAllObjects()!varoFinll =api.CreateSolidFillVarostroke = Api.Createstroke 0,Api.CreatenoFinllVar Oshape = Api.CreateShapeoShape.SetPosition(608400, 1267200)!varoccontent=oshape.getdoccontentvarodente=occontent.getEplement0var ORun=api.CreateRunORun.AddText ("这是一个文本运行集文本为黑")oParagraph.AddElement(oRun)!ORUN.SetShdoSlide.AddObject(oShape)!builder.SaveFile("pptx", "SetShd.pptx")!builder.CloseFile();