概述
'对自定义属性进行读取
Dim Properties = SourceDoc.CustomDocumentProperties
Dim PropertyType As Type = Properties.GetType
Try
Dim Authorprop = PropertyType.InvokeMember("Item", Reflection.BindingFlags.Default Or Reflection.BindingFlags.GetProperty, Nothing, Properties, New Object() {"备注"})
ResultString = Authorprop.GetType.InvokeMember("Value", Reflection.BindingFlags.Default Or Reflection.BindingFlags.GetProperty, Nothing, Authorprop, New Object() {})
Catch ex As Exception
End Try
'写入
Dim Authorprop = PropertyType.InvokeMember("Item", Reflection.BindingFlags.Default Or Reflection.BindingFlags.SetProperty, Nothing, properties, New Object() {"备注", ResultString})
另一种写法：
'增加新属性
SourceDoc.CustomDocumentProperties.Add(Name := "PropertyName", LinkToContent := False, Type := Microsoft.Office.Core.MsoDocProperties.msoPropertyTypeString, Value := "PropertyValue")
'修改属性
SourceDoc.CustomDocumentProperties("PropertyName").Value = PropertyValue
'获取属性值
PropertyValue =SourceDoc.CustomDocumentProperties("PropertyName").Value
'读取内置属性，以备注为例
ResultString= SourceDoc.BuiltInDocumentProperties(Microsoft.Office.Interop.Word.WdBuiltInProperty.wdPropertyComments).value
读取写入操作后可以通过在Word文档上右键->属性查看效果，但当Word文档处于打开状态时，文档上右键是没有“自定义”和“摘要”这两个Tab的。
最后
以上就是紧张凉面为你收集整理的VB.net读取Word文档属性的方法的全部内容，希望文章能够帮你解决VB.net读取Word文档属性的方法所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。
发表评论 取消回复