Question

How to copy a string in VB.NET

Answer 1

Imports System
				
' Copy using simple assignment

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim dest As String = src ' Copies reference only

        Console.WriteLine(dest)
    End Sub
End Module


' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
				
' Copy using New String()

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim dest As String = New String(src.ToCharArray())

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 3

Imports System
				
' Copy using String.Format()

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim dest As String = String.Format("{0}", src)

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 4

Imports System
Imports System.Text
				
' Copy using StringBuilder

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim sb As New StringBuilder()

        sb.Append(src)
        Dim dest As String = sb.ToString()

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 5

Imports System
				
' Copy using ToCharArray()

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim chars() As Char = src.ToCharArray()
        Dim dest As String = New String(chars)

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 6

Imports System
				
' Copy using Array.Copy()

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
		
        Dim srcArr() As Char = src.ToCharArray()
        Dim destArr(srcArr.Length - 1) As Char

        Array.Copy(srcArr, destArr, srcArr.Length)
        Dim dest As String = New String(destArr)

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals

Answer 7

Imports System
				
' Copy using manual loop

Module CopyString
    Sub Main()
        Dim src As String = "Programming is fun"
        Dim dest As String = ""

        For Each ch As Char In src
            dest &= ch
        Next

        Console.WriteLine(dest)
    End Sub
End Module



' run:
'
' Programming is fun
'

 

70+ SQL courses for beginners and professionals