使用 Excel VBA 比较 XML 输入解析列表中的最大数字

Question

   Set node = xmldoc.SelectNodes("//Attribute[@name='XSHIP_LOCATION']")
   For Each n In node
        result = n.Text
        logmsg = "XSHIP_LOCATION: " & result
        Call PrintLog(logmsg, logline)
   Next n

对于 xml 中包含 name=XSHIP_LOCATION 的每一行，都会读取该属性的值。我如何比较从 XML 读取的结果列表并选择最大的数字？

结果 = 1, 2,1,3,5,4,1,2 的示例

我想从 XML 读取的输入列表中找到最大的数字，在本例中使用 .

有好心人可以帮助这个新手吗？谢谢

Answer 1

为什么不添加第二个变量来捕获最大值，然后通过循环的每次迭代，将最大值与结果进行比较......因此

    result = n.Text   '->your code
    if result > max then max = result
    logmsg = "XSHIP_LOCATION: " & result    '--> your code

请注意，如果 n 不是数字，这将引发错误。