Module Module1

    Sub Main()
        ' 定义3个字符串变量
        Dim str1,str2,str3 As String
        '给str1，str2付初值
        str1 = "Hello" : str2 = "World"
        Console.WriteLine("方法Concat")
        '连接一个或多个字符串
        Console.WriteLine("str1={0},str2={1},String.Concat(str1,str2)={2}",str1,str2))
        '判断字符串中是否具有相同的值返回类型为布尔型
        Console.WriteLine("方法Equals")
        Console.WriteLine("str1={0},String.Equals(str2)={2}",str1.Equals(str2))
        '在字符串中指定索引位置插入指定的字符串
        Console.WriteLine("方法Insert")
        str1 = "0123456789" : str2 = "aaa"
        Console.WriteLine("str1={0},str1.Insert(5,str2))
        '左右对齐字符串中的字符
        Console.WriteLine("方法PadLeft/PadRight")
        str1 = "World" : str2 = "世界"
        Console.WriteLine("str1={0}",str1)
        Console.WriteLine("str1.PadLeft(8,""*"")={0},str.PadRight(8,""*"")={1}",str1.PadLeft(8,"*"),str1.PadRight(8,"*"))
        Console.WriteLine("str1={0}",str2)
        Console.WriteLine("str2.PadLeft(8,str2.PadRight(8,str2.PadLeft(8,"*"))
        '找出指定字符串或字符转在此字符串中的第一个、最后一个匹配项的索引位置
        Console.WriteLine("方法IndexOf/LastIndexOf")
        str1 = "Visual Basic.NET,ASP.NET,C#.NET"
        Console.WriteLine("str1={0}",str1)
        Console.WriteLine("str1.IndexOf(""NET"")={0},str1.LastIndexOf(""NET"")={1}",str1.IndexOf("NET"),str1.LastIndexOf("NET"))
        '将字符串中的字符复制到字符串数组
        Console.WriteLine("方法tocharArray")
        str2 = str1.tocharArray(str1.IndexOf("NET"),3)
        Console.WriteLine("str1={0}",str1)
        Console.WriteLine("str1.tocharArray(str1.IndexOf(""NET""),3)={0}",str2)
        '在指定字符串数组的每个元素之间串联指定的分隔符，产生单个串联的字符串
        Console.WriteLine("方法Join")
        Dim myArray(3) As String
        myArray(0) = "I" : myArray(1) = "am" : myArray(2) = "a" : myArray(3) = "student"
        For i As Integer = 0 To 3
            Console.Write("myArrat({0})={1}",i,myArray(i))
        Next
        Console.WriteLine()
        Console.WriteLine("String.Join(""*"",myArray)={0}",String.Join("*",myArray))
        '此字符串中删除指定个数字符
        Console.WriteLine("方法Remove")
        str1 = "0123456789"
        Console.WriteLine("str1={0},str1.Remove(2,3)={1}",3))
        '将此字符串指定字符串字符的所有匹配项代替为其他指定字符串
        Console.WriteLine("方法Replace")
        str2 = "123"
        str3 = "abc"
        Console.WriteLine("str1={0},str3={2},str1.Replace(str2,str3)={3}",str3,str3))
        '从此字符串检索字符串
        Console.WriteLine("方法SubString")
        Console.WriteLine("str1={0},str1.Substring(3,4)={1}",4))
        Console.ReadLine()
    End Sub

End Module