fix snippet

Author: gewarren

snippets/visualbasic/System/String/Join/join1.vb

@@ -9,27 +9,28 @@ Module Example
       Console.WriteLine("Primes less than {0}:", maxPrime)
       Console.WriteLine("   {0}", String.Join(" ", primes))
    End Sub
-   
+
    Private Function GetPrimes(maxPrime As Integer) As Integer()
       Dim values As Array = Array.CreateInstance(GetType(Integer), _
-                              New Integer() { maxPrime - 1}, New Integer(){ 2 }) 
+                              New Integer() { maxPrime - 1}, New Integer(){ 2 })
         ' Use Sieve of Eratosthenes to determine prime numbers.
       For ctr As Integer = values.GetLowerBound(0) To _
                            CInt(Math.Ceiling(Math.Sqrt(values.GetUpperBound(0))))
          If CInt(values.GetValue(ctr)) = 1 Then Continue For
-         
+
          For multiplier As Integer = ctr To maxPrime \ 2
             If ctr * multiplier <= maxPrime Then values.SetValue(1, ctr * multiplier)
-         Next   
-      Next      
-      
+         Next
+      Next
+
       Dim primes As New System.Collections.Generic.List(Of Integer)
       For ctr As Integer = values.GetLowerBound(0) To values.GetUpperBound(0)
          If CInt(values.GetValue(ctr)) = 0 Then primes.Add(ctr)
-      Next            
+      Next
       Return primes.ToArray()
-   End Function   
+   End Function
 End Module
+
 ' The example displays the following output:
 '    Primes less than 100:
 '       2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97

snippets/visualbasic/System/String/Join/join2.vb

@@ -11,6 +11,7 @@ Class Sample
       Console.WriteLine("String.Join(sep, val, 1, 2) = '{0}'", result)
    End Sub
 End Class
+
 'This example displays the following output:
 '       sep = ', '
 '       val() = {'apple' 'orange' 'grape' 'pear'}

snippets/visualbasic/System/String/Join/join3.vb

@@ -11,27 +11,28 @@ Module Example
       Console.WriteLine("Primes less than {0}:", maxPrime)
       Console.WriteLine("   {0}", String.Join(" ", primes))
    End Sub
-   
+
    Private Function GetPrimes(maxPrime As Integer) As List(Of String)
       Dim values As Array = Array.CreateInstance(GetType(Integer), _
-                              New Integer() { maxPrime - 1}, New Integer(){ 2 }) 
+                              New Integer() { maxPrime - 1}, New Integer(){ 2 })
         ' Use Sieve of Eratosthenes to determine prime numbers.
       For ctr As Integer = values.GetLowerBound(0) To _
                            CInt(Math.Ceiling(Math.Sqrt(values.GetUpperBound(0))))
          If CInt(values.GetValue(ctr)) = 1 Then Continue For
-         
+
          For multiplier As Integer = ctr To maxPrime \ 2
             If ctr * multiplier <= maxPrime Then values.SetValue(1, ctr * multiplier)
-         Next   
-      Next      
-      
+         Next
+      Next
+
       Dim primes As New List(Of String)
       For ctr As Integer = values.GetLowerBound(0) To values.GetUpperBound(0)
          If CInt(values.GetValue(ctr)) = 0 Then primes.Add(ctr.ToString())
-      Next            
+      Next
       Return primes
-   End Function   
+   End Function
 End Module
+
 ' The example displays the following output:
 '    Primes less than 100:
 '       2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97

snippets/visualbasic/System/String/Join/join4.vb

@@ -10,19 +10,20 @@ Module modMain
    Public Sub Main()
       Dim output As String = String.Join(" ", GetAlphabet(True).Where(Function(letter) _
                                                          letter >= "M"))
-        
-      Console.WriteLine(output)                                     
+
+      Console.WriteLine(output)
    End Sub
-   
+
    Private Function GetAlphabet(upper As Boolean) As List(Of String)
       Dim alphabet As New List(Of String)
       Dim charValue As Integer = CInt(IIf(upper, 65, 97))
       For ctr As Integer = 0 To 25
          alphabet.Add(ChrW(charValue + ctr).ToString())
       Next
-      Return alphabet 
+      Return alphabet
    End Function
 End Module
+
 ' The example displays the following output:
 '      M N O P Q R S T U V W X Y Z
 ' </Snippet4>

snippets/visualbasic/System/String/Join/join5.vb

@@ -8,12 +8,12 @@ Imports System.Collections.Generic
 Public Class Animal
    Public Kind As String
    Public Order As String
-   
+
    Public Sub New(kind As String, order As String)
       Me.Kind = kind
       Me.Order = order
    End Sub
-   
+
    Public Overrides Function ToString() As String
       Return Me.Kind
    End Function
@@ -24,12 +24,13 @@ Module Example
       Dim animals As New List(Of Animal)
       animals.Add(New Animal("Squirrel", "Rodent"))
       animals.Add(New Animal("Gray Wolf", "Carnivora"))
-      animals.Add(New Animal("Capybara", "Rodent")) 
+      animals.Add(New Animal("Capybara", "Rodent"))
       Dim output As String = String.Join(" ", animals.Where(Function(animal) _
                                            animal.Order = "Rodent"))
-      Console.WriteLine(output)                                           
+      Console.WriteLine(output)
    End Sub
 End Module
+
 ' The example displays the following output:
 '      Squirrel Capybara
 ' </Snippet5>

snippets/visualbasic/System/String/Join/join6.vb

@@ -1,7 +1,7 @@
 ' Visual Basic .NET Document
 Option Strict On
 
-' <Snippet2>
+' <Snippet1>
 Imports System.Collections.Generic
 
 Module Example
@@ -32,7 +32,8 @@ Module Example
       Return primes
    End Function
 End Module
+
 ' The example displays the following output:
 '    Primes less than 100:
 '       2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97
-' </Snippet2>
+' </Snippet1>

xml/System/String.xml

@@ -9579,7 +9579,7 @@ The following example uses the Sieve of Eratosthenes algorithm to calculate the
 
 :::code language="csharp" source="~/snippets/csharp/System/String/Join/join6.cs" interactive="try-dotnet" id="Snippet2":::
 :::code language="fsharp" source="~/snippets/fsharp/System/String/Join/join6.fs" id="Snippet2":::
-:::code language="vb" source="~/snippets/visualbasic/System/String/Join/join2.vb" id="Snippet2":::
+:::code language="vb" source="~/snippets/visualbasic/System/String/Join/join6.vb" id="Snippet1":::
 
  ]]></format>
         </remarks>