Vbscript 检查weblist中的项目是否缩进

我有一个weblist中的项目列表，它有父项和子项。Child缩进到右边，我需要在datatable的两个不同列中检索Child和parent的值

我的代码是这样的：

list = qtp_getroproperty(page.weblist(), "items count", itemsCount
For n = 1 To itemsCount
  items = page.weblist(), getitem(n)

试试这个

if strSurname.StartsWith(" ")

在VBScript中，它是：

---

有几种方法可以做到这一点：

• 使用函数提取第一个字符，如下所示：

• 使用函数检查第一个字符：

  If InStrRev(str, " ", 1) > 0 Then
    ...
  End If
  

• 输入字符串并将其与原始字符串进行比较：

  If LTrim(str) <> str Then
    ...
  End If
  

  请注意，最后一种方法是最通用的，但也是最昂贵的。通常，用它来检查像“字符串是否以空格开头”这样简单的内容是没有意义的。例如，如果您想检查“字符串是否以任何类型的空格开头”（

  “^\s”

  ），它会变得更有用

---

这不是VBScript。在我看来，这是一个错误。如果你描述了你想通过这样做实现什么，你可能会得到更好的答案。示例输入也可能有帮助。如果您认为您的编辑澄清了任何问题：它没有。我需要检查Web列表中的项目是否缩进，如果缩进，则将值作为子项获取到datatable，否则作为父项。我的代码如下所示：list=qtp\u getroperty（page.weblist（），“items count”，itemsCount For n=1到itemsCount items=page.weblist（），getitem（n）@renju请编辑您的问题。您可能还希望在添加标记时添加标记。当然，我确实编辑了我的问题

If InStrRev(str, " ", 1) > 0 Then
  ...
End If

If LTrim(str) <> str Then
  ...
End If

Set re = New RegExp
re.Pattern = "^ "
If re.Test(str) Then
  ...
End If