notes读取word文档批注的问题

[c104]

我需要在notes中读取某一个word文档的批注，可是我写的代码在vb里面是可以用的，在notes里面就是不行，提示Msgbox acom.Scope.Text类型不匹配
请帮忙看一下，谢谢！
代码如下：

Dim wordApplication As Variant
Dim wordWorkbook As Variant
Dim wordSheet As Variant

Dim selection As Variant

Set wordApplication = CreateObject("word.Application")
Call wordApplication.Documents.open ("C:\comments.doc")


Dim source1 As Variant
Set source1 = wordApplication.activedocument

Forall acom In source1.Comments
acom.Reference.Select
Msgbox acom.Scope.Text
Msgbox acom.Range
End Forall

wordApplication.Quit
Set wordApplication = Nothing

[ibm123]

Msgbox acom.Range.text

[c104]

啊，对！
vb里Text属性是缺省的，notes不行！