将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用于对象引用，因此不适用于此。