[未解决]运行错误是VBA不支持吗？

jie-jie

在regex match tracer 测试通过，为什么在VBA在运行错误，请指教一下 正则日期.rar (8.39 KB, 下载次数: 21)

2010-5-28 13:24 上传

点击文件名下载附件

[ 本帖最后由 jie-jie 于 2010-5-28 17:16 编辑 ]

jie-jie

顶一下，要沉了

fsydw

MsgBox .test(arr(i, 1))

不清楚这个test

fsydw

直接MsgBox (arr(i, 1))，不行吗？

jie-jie

原帖由 fsydw 于 2010-5-28 17:24 发表
直接MsgBox (arr(i, 1))，不行吗？

目的不是要TEST，只是说明一下问题：问题就是在VBA中的正则不能用组名吗？
下面的就不会报错：
Sub test()
Dim arr, i%, regex
Set regex = CreateObject("vbscript.regexp")
arr = Range("a1:a4")
With regex
    .Global = True
    .Pattern = "(19|20)\d\d[-_/]?[0-1]\d[-_/]?[0-3]\d"
    For i = 1 To 4
       MsgBox .test(arr(i, 1))
    Next
End With
End Sub

来生缘

VBA用不了TEST

jie-jie

原帖由 来生缘 于 2010-5-28 17:35 发表
VBA用不了TEST

不可能吧，见楼上

fsydw

test是本过程名，用本过程、来调用本过程吗？是不是一万年也没结果啊

fsydw

原帖由 jie-jie 于 2010-5-28 17:33 发表


目的不是要TEST，只是说明一下问题：问题就是在VBA中的正则不能用组名吗？
下面的就不会报错：
Sub test()
Dim arr, i%, regex
Set regex = CreateObject("vbscript.regexp")
arr = Range("a1:a4")
With r ...

请问什么是“正则” ？什么是“组名” ？

hanter007

看起来好像是没有问题的哦..一时间搞不明白.