现在有以下代码，可以判别当前Word（ADOC变量所代表）文档中是否有嵌入式图形文件

If adoc.InlineShapes.Count <> 0 Then
                MsgBox "有嵌入式图片存在!"       
 Else
                MsgBox "没有嵌入式图片存在!"
 End If

现在想请教一下，如果检测到有嵌入式图形存在，接下来该如何判断它的环绕方式为“嵌入型”、“四周星”、“紧密型”等呢？谢谢！