Преобразование текста 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-й символ в виде числа - 1:

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

Set для ссылок на объект так не применяется здесь.