diff --git a/snippets/visualbasic/VS_Snippets_Data/Classic WebData XmlDocument.CreateElement Example/VB/source.vb b/snippets/visualbasic/VS_Snippets_Data/Classic WebData XmlDocument.CreateElement Example/VB/source.vb
index 6643375273c..7d3a4454539 100644
--- a/snippets/visualbasic/VS_Snippets_Data/Classic WebData XmlDocument.CreateElement Example/VB/source.vb
+++ b/snippets/visualbasic/VS_Snippets_Data/Classic WebData XmlDocument.CreateElement Example/VB/source.vb
@@ -6,23 +6,31 @@ Imports System.IO
Imports System.Xml
Public Class Sample
-
+
Public Shared Sub Main()
'Create the XmlDocument.
Dim doc As New XmlDocument()
doc.LoadXml("" & _
"Pride And Prejudice" & _
"")
-
+
'Create a new node and add it to the document.
'The text node is the content of the price element.
Dim elem As XmlElement = doc.CreateElement("price")
Dim text As XmlText = doc.CreateTextNode("19.95")
doc.DocumentElement.AppendChild(elem)
doc.DocumentElement.LastChild.AppendChild(text)
-
+
Console.WriteLine("Display the modified XML...")
doc.Save(Console.Out)
End Sub
End Class
+' The example displays the following output:
+'
+' Display the modified XML...
+'
+'
+' Pride And Prejudice
+' 19.95
+'
'