vb 操作xml '91'错误
<?xml version= "1.0 " encoding= "gb2312 "?>
<集合>
<子集>
<名称> 张三 </名称>
<奖金> 5000 </奖金>
</子集>
<子集>
<名称> 李四 </名称>
<奖金> 4400 </奖金>
</子集>
</集合>
Private Sub Form_Load()
Dim xml As DOMDocument
Set xml = New DOMDocument
Dim root As IXMLDOMNode
Set root = xml.documentElement
Dim node As IXMLDOMNode
xml.async = False
Call xml.Load(App.Path & "\Program.xml ")
Set node = root.selectSingleNode( "李四 ")
MsgBox node.Text
End Sub
最终目的:msgbox出李四的奖金.
异常为:执行到 "Set node = root.selectSingleNode( "李四 ") "这行时,出现 实时错误 '91 ',对象变量或with块变量未设置,请教怎么改啊?
相关推荐
vb读取xml文件节点值操作实例
VB读取XML文件的操作实例,演示读取XML各个定义键的值。程序是一个专一读取XML文件的VB类,并没有使用微软的XML.DLL。因此比较有参考价值,很不错。
VB.NET实现UDP实时在线云消费机服务器端
UDP(用户数据报协议)是无连接、低延迟的传输层协议,在物联网设备通信中常用于高频小数据包场景。其核心原理是收发双方不建立持久连接,通过Socket套接字直接交换数据,配合应用层心跳保活机制维持在线状态。这种模型天然适应实时在线业务,设备侧定时上报心跳,服务器端维护设备表,一旦超时即判定离线。相比TCP,UDP省去握手和确认开销,适合消费机这类大量小额交易、允许少量丢包靠应用层重发的场景。在工程实践中,开发者需重点关注数据帧编解码、异步接收与并发处理,并合理利用MySQL批量落库保证数据可靠性。以VB.NE
VB中怎样操作XML文件
VB中怎样操作XML文件 (包含VB动态加载控件)
VB_XML.rar_ VB_XML_VB speeaksdk xml_vb xml_xml_xml vb
VB使用xml的源代码。自己编写的。很不错。一看就懂
vb6XML读写
vb中读写XML文件实例Dim XMLDoc As DOMDocument Dim root As IXMLDOMNode Dim xlst As IXMLDOMNodeList, xlst1 As IXMLDOMNodeList Dim xn As IXMLDOMNode Dim xnf As IXMLDOMNode Dim xe As IXMLDOMElement Set XMLDoc = New DOMDocument XMLDoc.Load "F:\example\test.xml" 'xml文件路径根据存放路径不同而不同! Set xn = XMLDoc.selectSingleNode("testlist") '以下为读取xml文件内容,这里用ListView控件显示 Set xlst = xn.childNodes ListView1.ListItems.Clear For Each xnf In xlst Set xe = xnf Set xlst1 = xe.childNodes With ListView1.ListItems.Add(, , xlst1.Item(0).Text) .SubItems(1) = xlst1.Item(1).Text .SubItems(2) = xlst1.Item(2).Text End With Next



