对于XML而言,DOM文档对象模型是一个对象化的数据接口,该对象模型包括多个对象集合,通过操作这些对象,可以轻松地操纵XML文档的数据。要使用DOM对象操作XML文档,首先需要建立Document对象。该对象在创建时,通常并不具备任何数据内容,用户在创建后,需要使用该对象的Load方法加载XML文档或者使用LoadXML方法加载XML字符串数据。本文介绍在Excel中使用DOM对象加载XML文档的方法。
1、启动Excel 2013并打开Visual Basic编辑器,选择“工具”|“引用”命令打开“引用”对话框,在“可使用的引用”列表中选择"Microsoft XML,v6.0"选项,如图1所示。单击“确定”按钮即可实现对XML库文件的引用。
图1 引用XML库文件
2、在工程资源管理器中添加一个模块,在模块的“代码”窗口中输入程序代码,如图2所示。具体的程序代码如下所示:
Sub CreatXMLDocument()
Dim xmlDoc1 As New DOMDocument '新建Document文档对象
Dim xmlDoc2 As New DOMDocument '新建Document文档对象
Dim strTemp As String
xmlDoc1.async=False
xmlDoc1.Load ThisWorkbook.Path&"学生信息.xml" '直接加载XML文档
strTemp=xmlDoc1.XML '保存XML字符串
Debug.Print strTemp '输出XML字符串
xmlDoc2.LoadXML strTemp 'Document对象使用XML字符串加载数据
Debug.Print xmlDoc2.XML '输出XML字符串
Set xmlDoc1=Nothing
Set xmlDoc2=Nothing
End Sub
图2 插入模块并输入程序代码
提示
代码第5行使XML文件的下载不被同步处理。在XML中,async属性的取值为True时,表示load()方法可在下载完成之前,向调用程序返回控制权;取值为False时,则表示必须完成文件的下载,才能返回控制权。
3、按F5键运行以上过程,此时在“立即窗口”中将显示“学生信息.xml”文档数据,如图3所示。
图3 程序运行的结果