vb - VB / 基础类

我想把word另存为xml之后，用vb读取这个xml的内容，请问如何实现？

dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
L=LOF(f)
redim b(L-1)
b=inputb(L,#f)
close #f
s=strconv(b,vbUnicode)

上面的读出的xml是好像是繁体字

现在只想把xml里的数据读取出来，组成一个字符串，不读取xml的格式，请问怎么实现啊！

如果你的xml是标准格式，用下边的方法就可以读出来的
Dim xml As MSXML2.DOMDocument30
Set xml = New MSXML2.DOMDocument30
xml.async = False
xml.Load CD_Down.FileName

Dim oRst As ADODB.Recordset

Set oRst = New ADODB.Recordset

oRst.Open xml

向楼上的：学习，
向楼上的：学习，
向楼上的：学习，
向楼上的：学习，

引用xml对象来处理....
recordset.open xml只能处理由recordset.save xml保存的持久性记录集....

现在我的这个xml文件是用word另存出来的，肯定不是标准的，可是我只想要读取xml中的数据，不想读取任何格式

引用
上面的读出的xml是好像是繁体字

测试. 不是繁体是乱码.

引用
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f

vb - VB / 基础类

请好心人帮我把VB源码转为VB.NET~

为什么用VB改变不了工具栏按扭的宽度 - VB / 控件

求助：VB调用动态库问题 - VB / 基础类

Vb.net Access CrystalReport - .NET技术 / VB.NET

vb的类中使用自定义类型数据的问题 - VB / 基础类