将XmlNode文本转换为整数

Question

我尝试使用的代码是这样的。

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

文本对象我在做什么错在这里？

Answer 1

VBScript字符串没有.substring方法（或任何有关此方法的方法，它们不是对象）。

如果你想第一个字符为数字 - 1：

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

Set是对象引用所以在这里不适用。