Add newline in HTML source code using HTML Agility Pack

I haven't published anyvb.net a long period, so I tried this out first inC# :

var document = new HtmlDocument();
var div = HtmlNode.CreateNode("<div></div>");
var newline = HtmlNode.CreateNode("\r\n");
div.AppendChild(newline);
for (int i = 0; i < 2; ++i)
{
    div.AppendChild(HtmlNode.CreateNode("<div></div>"));
    div.AppendChild(newline);
}
document.DocumentNode.AppendChild(div);
Console.WriteLine(document.DocumentNode.WriteTo());

Works excellent and produces:

<div>
<div></div>
<div></div>
</div>

Then thought, "No way, it's not possible." - note the commented lines:

Dim document = New HtmlDocument()
Dim div = HtmlNode.CreateNode("<div></div>")
' this writes the literal string...
Dim newline = HtmlNode.CreateNode("\r\n")
' this works!
' Dim newline = HtmlNode.CreateNode(Environment.NewLine)
div.AppendChild(newline)
For i = 1 To 2
    div.AppendChild(HtmlNode.CreateNode("<div></div>"))
    div.AppendChild(newline)
Next
document.DocumentNode.AppendChild(div)
Console.WriteLine(document.DocumentNode.WriteTo())

Unfortunately, that is the case, which is presumably why the output is the query you provided wasn't marked as answered:

<div>\r\n<div></div>\r\n<div></div>\r\n</div>

Lastly, rather of use the newline string as\r\n tried Environment.NewLine , which produces the following results:

<div>
<div></div>
<div></div>
</div>

In C#, it works both ways.