Regex 具有几种不同模式的正则表达式

Regex 具有几种不同模式的正则表达式,regex,vb.net,Regex,Vb.net,我在VB.NET中使用这些正则表达式,它们都单独工作: texto = "ola <a href=""http://www.aiaia.pt"">coisas</a> tas <object> zborgind </object> bom <iframe src=""http://www.uiuiuiuiiu.pt""></iframe> hoje? <center>qq coisa</center>

我在VB.NET中使用这些正则表达式,它们都单独工作:

texto = "ola <a href=""http://www.aiaia.pt"">coisas</a> tas <object> zborgind </object> bom <iframe src=""http://www.uiuiuiuiiu.pt""></iframe> hoje? <center>qq coisa</center> Já acabou, <script>document.write(""oi"")</script> ...agora!"
Dim regEx2 As New Regex("<a[^>]*>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("</a[^>]*>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("<object.*?>.*</object\s*?>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("<iframe.*?>.*</iframe\s*?>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("<center[^>]*>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("</center[^>]*>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
regEx2 = New Regex("<script[^>]*>([\w\W]*?)</script>", RegexOptions.IgnoreCase Or RegexOptions.Multiline)
texto = regEx2.Replace(texto, String.Empty)
我怎样才能在一个表达式中加入它们

我试着把这些加入其中:

Dim texto2 As String = "ola <a href=""http://www.aiaia.pt"">coisas</a> tas <object> zborgind </object> bom <iframe src=""http://www.uiuiuiuiiu.pt""></iframe> hoje? <center>qq coisa</center> Já acabou, <script>document.write(""oi"")</script> ...agora!"

Dim re As New Regex( _
    "^<a[^>]*>$" & _
    "^</a[^>]*>$" & _
    "^<object.*?>.*</object\s*?>$" & _
    "^<iframe.*?>.*</iframe\s*?>$" & _
    "^<center[^>]*>$" & _
    "^</center[^>]*>$" & _
    "^<script[^>]*>([\w\W]*?)</script>$", _
    RegexOptions.IgnoreCase Or RegexOptions.Multiline _
)
但是不起作用。你能帮助我吗?提前感谢。

^和$匹配一行的开头和结尾。它们不在正则表达式中划分子模式。用|代替;它与左侧或右侧匹配

Dim re As New Regex( _
    "<a[^>]*>" & _
    "|</a[^>]*>" & _
    "|<object.*?>.*</object\s*?>" & _
    "|<iframe.*?>.*</iframe\s*?>" & _
    "|<center[^>]*>" & _
    "|</center[^>]*>" & _
    "|<script[^>]*>([\w\W]*?)</script>", _
    RegexOptions.IgnoreCase Or RegexOptions.Multiline _
)

你能使用格式化工具吗?你也应该用英语来命名你的变量,这是你的首选。。。