vb System.String.Copy类(方法)实例源码

Dim original = "This is a sentence. This is a second sentence."
Dim sentence1 = original.Substring(0, original.IndexOf(".") + 1)
Console.WriteLine(original)
Console.WriteLine(sentence1)

Private Sub UseMutableBuffer()
    Dim original = "This is a sentence. This is a second sentence."
    Dim sb = new StringBuilder(original)
    Dim index = original.IndexOf(".")
    sb(index) = ";"
    sb(index + 2) = Char.ToLower(sb(index + 2))
    Console.WriteLine($"Original string: {original}")
    Console.WriteLine($"Modified string: {sb.ToString()}")
End Sub

' 导入命名空间
Imports System
Imports System.Collections

Public Class MainClass
    
    Shared Sub Main()
             Dim s1 As String = "abcd"
             Dim s2 As String = "ABCD"
             Dim s3 As String = "Liberty Associates, Inc. provides "
             s3 = s3 & "custom .NET development"

             Dim s5 As String = String.Copy(s2)
             Console.WriteLine("s5 copied from s2: {0}", s5)


             Dim location As Integer = s3.IndexOf("provides")

             Dim s10 As String = s3.Insert(location, "usually ")
             Console.WriteLine("s10: {0}", s10)
   End Sub

End Class