VB.net 关于Word的InlineShapes和Shape的转化问题, ConverToShape问题

[XboxNE]

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的文档中输出

[XboxNE]

没人做过Word的报表吗, 可惜啦!