没有这种语法。如果要简便,可以这样写
Dim ary = "1,2,3,4,5,6,7".split(",")
If array.indexof(ary, 5) >= 0 then
msgbox("包含")
End If