关于for内数组有关问题

关于for内数组问题
s="年龄:20"&chr(10)&_
"住址:北京市东区"&chr(10)&_
"姓名:张三"&chr(10)&_
"个人主页:http://www.csdn.net"
 
arrfield=array("name","age","addr","site")
arrrx=array("^(姓名|名字)[:：]([^\r\n]+)","^(年龄|年纪|岁数)[:：]([^\r\n]+)","^(地址|住址)[:：]([^\r\n]+)","^(个人主页|网址)[:：]([^\r\n]+)")
set rx=new regexp
rx.Multiline=true
rx.Global=true
for i=0 to ubound(arrfield)
  rx.Pattern=arrrx(i)
  set mc=rx.Execute(s)
  if mc.count>0 then
     set m=mc(0)
    msgbox  arrfield(i)&":"&m.submatches(1)
  else
    msgbox "找不到和“"&arrfield(i)&"”匹配的内容"
  end if
next
 这里怎么得到变量name=张三  age=20   addr=北京市东区  site=http://www.csdn.net
set rx=nothing
[解决办法]

s="年龄:20"&chr(10)&_
"住址:北京市东区"&chr(10)&_
"姓名:张三"&chr(10)&_
"个人主页:http://www.csdn.net"
 
arrfield=array("name","age","addr","site")
for i=0 to ubound(arrfield)
   execute (arrfield(i) & "=""""")
next
arrrx=array("^(姓名
[解决办法]
名字)[:：]([^\r\n]+)","^(年龄
[解决办法]
年纪
[解决办法]
岁数)[:：]([^\r\n]+)","^(地址
[解决办法]
住址)[:：]([^\r\n]+)","^(个人主页
[解决办法]
网址)[:：]([^\r\n]+)")
set rx=new regexp
rx.Multiline=true
rx.Global=true
for i=0 to ubound(arrfield)
  rx.Pattern=arrrx(i)
  set mc=rx.Execute(s)
  if mc.count>0 then
     set m=mc(0)
    msgbox  arrfield(i)&":"&m.submatches(1)
    execute (arrfield(i) & "=""" & m.submatches(1) & """")
  else
    msgbox "找不到和“"&arrfield(i)&"”匹配的内容"
  end if
next
' 这里怎么得到变量name=张三  age=20   addr=北京市东区  site=http://www.csdn.net
msgbox name
set rx=nothing