摘要:
ppt = WIN32OLE::new('powerpoint.Application')ppt.DisplayAlerts = 1 #不显示任何警告ppt_presents = ppt.Presentations #演示文稿present = ppt_presents.open(filename,false,false,true)for slide in present.Slides for shape in slide.shapes if (shape.TextFrame.HasText == -1) begin text = shape.TextFrame.TextRan 阅读全文
posted @ 2013-09-04 09:37
遗失的流年
阅读(428)
评论(0)
推荐(0)

浙公网安备 33010602011771号