VB.net 关于Word的InlineShapes和Shape的转化问题, ConverToShape问题
Dim nIs, nIs1 As Microsoft.Office.Interop.Word.InlineShape
Dim nS As Microsoft.Office.Interop.Word.Shape
nIs = 插入第一张InlineShapes
nIs.AlternativeText = "ABC"
nIs.Select()
nIs.Height = 470
nIs.Width = 580
nS = nIs.ConvertToShape() '第一张转化成功
nS.IncrementRotation(90.0#)
nS.ZOrder(MsoZOrderCmd.msoSendBehindText)
nS.IncrementTop(568)
nS.IncrementLeft(-54)
nIs1 = 插入第二张InlineShapes
nIs1.AlternativeText = "ABC"
nIs1.Select()
nIs1.Height = 200
nIs1.Width = 200
nS = nIs1.ConvertToShape() '第二张转化成功老失败
nS.IncrementRotation(90.0#)
nS.ZOrder(MsoZOrderCmd.msoBringInFrontOfText)
求教高手指点,如何让在第二张插入的图片上使用ConverToShape(),
该代码目的是将两张图片重叠,在Word的文档中输出