问一个for each 语法的问题

[ayu0826]

为什么
dim a,c,b,d
a=1
dim yunsuan
yunsuan=Array("+","-","*","/")
dim shu
shu=Array("1","2","3","4")
for Each anyElement In yunsuan
c=anyElement
for each anyElement In shu
d=eval(a&c&anyElement)
next
next

总提示 循环控制变量 'for' 无效
说是这一行的问题
for each anyElement In shu
我查了资料这个语法可以用嵌套的 就是不明白哪里出问题了

[-晴天]

<%
dim a,c,b,d 
a=1 
dim yunsuan 
yunsuan=Array("+","-","*","/") 
dim shu 
shu=Array("1","2","3","4") 
for Each anyElement1 In yunsuan 
      c=anyElement1 
        for each anyElement2 In shu 
          d=eval(a&c&anyElement2)
        next 
next 
%>