设置文本填充当前文本运行
| 名称 | 类型 | 描述性 |
| OAPIFILLLL | apiFill | 颜色或模式填充文本颜色 |
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.CreateRunvaroTextPrssun.getTextProTextPr.SetFontSize(50)!i.CreateSolidFilloTextPr.SetTextFill(oFill)!oParagraph.SetJc("left")!ORun.AddText ("这是形状内带黑文本填充集使用文本属性的样本文本")oParagraph.AddElement(oRun)!oSlide.AddObject(oShape)!builder.SaveFile("pptx", "SetTextFill.pptx")!builder.CloseFile();