Regex not working (newline)

Question

Это мое последнее прибежище. Пожалуйста помоги.

Источник:

<div class="custom"> 
    <div class="presence">Eating</div> 

код, который не работает:

Dim code As String = "\s*<div class=""custom"">""\n""\s*<div class=""presence"">.*</div>" 

    Dim reg As New Regex(code) 
    If reg.IsMatch(RichTextBox1.Text) Then 
     MsgBox("h") 
    End If 

Answer 1

\s достаточно, чтобы разобрать любые пробельные символы, в том числе новые символы линии:

Dim code As String = "\s*<div class=""custom"">\s*<div class=""presence"">.*</div>" 

Answer 2

Вы можете попробовать с помощью \r\n вместо \n