+ -
当前位置:首页 → 问答吧 → VB中的正则表达式问题

VB中的正则表达式问题

时间:2011-11-04

来源:互联网

比如我有一个str = “123456”,我想判断这个字符串中是否有‘5’这个字符。用正则怎么写?(高手直接付代码!!)感谢

作者: oyxccyj   发布时间: 2011-11-04

吼吼。这么简单的事,我就直接查找。

作者: luobaoline   发布时间: 2011-11-04

引用楼主 oyxccyj 的回复:
比如我有一个str = “123456”,我想判断这个字符串中是否有‘5’这个字符。用正则怎么写?(高手直接付代码!!)感谢

VB code
Private Sub Form_Load()
    Dim s$
    s = "123456"
    With CreateObject("vbscript.regExp")
        .Pattern = "5"
        If .Execute(s).Count > 0 Then MsgBox "有5!", vbInformation
    End With
End Sub

作者: sysdzw   发布时间: 2011-11-04

.Pattern = "5"'这里的5就是正则表达式,可以写成下面4种:
[5]
[5]{1}
(?:5)
\5

作者: sysdzw   发布时间: 2011-11-04

引用 3 楼 sysdzw 的回复:

.Pattern = "5"'这里的5就是正则表达式,可以写成下面4种:
[5]
[5]{1}
(?:5)
\5
最后的\5不算

作者: sysdzw   发布时间: 2011-11-04

这个可以不用正则表达式。

strSource = "123456"
If strSource Like "*5*" Then 
  MsgBox "Yes"
Else
  MsgBox "No"
End If

作者: of123   发布时间: 2011-11-04