在VBScript中搜索字符串以验证是否包含字符

Question

我正在尝试查看字符串是否包含点。

Set Root_Currency = Root_TaxDataSummary.SlvObject("Currency")   
curr_val = InStr(Root_Currency,".")
If curr_val.exist Then

     pass
else
     fail

我的方式有什么不妥吗？

Answer 1

InStr returns an integer表示搜索到的文本可以在字符串中找到的位置。

curr_val.exist无法正常工作，因为整数类型没有exist方法。代替：

If curr_val > 0 Then

或（如果这是该变量的唯一用途）：

If InStr(Root_Currency,".") > 0 Then

最后，因为在VBScript中0被视为False，所以您不需要包含相等性。找到该角色的位置或者你得到0 / false：

If InStr(Root_Currency,".") Then

Answer 2

InStr会返回一个简单的＆＃39; number（基于1的基准索引/大海捞针的位置，或0表示未找到＆＃39;或Null表示Null参数）不是对象。所以将代码更改为：

If curr_val Then
   ' found
Else
   ' not found
End If