实现在VBA代码中使用In运算符

ljp518

{:soso_e163:}

zhu320211

这个版主能做个示例吗？

layaman_999

示例：
Eval ("3 in (1,2,3) ") 返回 true
Eval ("4 in (1,2,3)") 返回 false
============
dim I
I=(表达式)
if Eval ( i & " in (1,2,3)") then
  msgbox "i是1,2,3中的其中一个数"
else
  msgbox "i不是1,2,3中的其中一个数"
end if

zhu320211

还是不行啊，如果用变量要加引号吗

layaman_999

zhu320211 发表于 2012-6-6 18:54
大侠，这个可以是文字吗？试了一下，怎么换成文字就不行了

字符串：
Eval ("'A' in ('A','B','C') ") 返回 true
Eval ("'D' in ('A','B','C') ") 返回 false
注意加''
^_^

zhu320211

layaman_999 发表于 2012-6-4 18:49
示例：
Eval ("3 in (1,2,3) ") 返回 true
Eval ("4 in (1,2,3)") 返回 false

大侠，这个可以是文字吗？试了一下，怎么换成文字就不行了