将XmlNode文本转换为整数

我试图使用的代码就是这个.

Dim oNode
Set oNode = XmlDoc.SelectSingleNode("/Record/CelloXml/Integration/Case/Hearing/Court/NodeID")

Dim iIndex 
Set iIndex = (CInt((oNode.Text).substring(0,1))) - 1

我想使用iIndex来决定arraylist中的元素以返回到父应用程序.

我目前得到的错误是我需要oNode.Text中的文本对象

我在这做错了什么？

解决方法

VBScript字符串没有.substring方法(或者任何方法,它们不是对象).

如果你想将第一个字符作为数字 – 1：

Dim iIndex 
iIndex = clng(left(oNode.Text,1)) - 1

Set用于对象引用,因此不适用于此处.