From adbfe3afa8cb9c14d72ea2f6ab9e4661cff0693b Mon Sep 17 00:00:00 2001
From: Stuart Mosquera <stuartmosquera18@gmail.com>
Date: Fri, 29 Aug 2025 13:29:38 -0300
Subject: [PATCH] add output for CreateTextNode method in VB

---
 .../VB/source.vb                                   | 14 +++++++++++---
 1 file changed, 11 insertions(+), 3 deletions(-)

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("<book genre='novel' ISBN='1-861001-57-5'>"  & _
                     "<title>Pride And Prejudice</title>"  & _
                     "</book>")
-        
+
         '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...
+' <?xml version="1.0" encoding="utf-8"?>
+' <book genre="novel" ISBN="1-861001-57-5">
+'   <title>Pride And Prejudice</title>
+'   <price>19.95</price>
+' </book>
 ' </Snippet1>