String类：
    在VB.NET中，使用string类的实例来存储字符串，string类包含在命名空间System中。

    eg:Dim S1 As String = "Hello my Friend"
    注：首先，它告诉VB.NET要创建一个String类型的数据变量S1，然后创建string类的一个实例，并为
该实例赋予初值"Hello my Friend"，最后再把实例的地址赋给变量S1，其实S1是引用变量。
   
1、String类中的部分特性和方法：
  s.Char(i) ----------用来得到String实例的第i个位置上的字符
  String.Copy(s)------返回一个新的字符实例，它是s的拷贝
  s.StartWith("a")----如果String实例是以字符"a"开始的，返回True，否则返回False
  s.EndsWith("a")-----如果String实例是以字符"a"结束的，返回True，否则返回False
  s.Equals(S1)--------对String实例的s和S1逐个字符进行比较，完全相同则返回True，否则返回False
  s.IndexOf("a")------返回String实例s的第一个字符"a"的索引(相对于0)，如果没有找到则返回-1，如果
                       s为空返回0
  s.Insert(i,"a")-----把字符"a"插入第i个位置上(相对于0)，并且返回新的String实例
  s.Length -----------得到字符串的字符个数，也就是它的长度
  s.Replace("a","b")--搜索查询字符"a"，把它用字符"b"替换，并且返回String的实例
  s.Split("a")--------返回String数组a,它包含字符"a"分开的字串
  s.Substring(i,j)----返回s中从第i个(相对于0)开始取j个字符的实例
  s.ToUpper()---------把String实例转换成大写字母并返回一个新的String实例
  s.ToLower()---------把String实例转换成小写字母并返回一个新的String实例

2、综合举例如下：

Option Strict On

'将Option Strict设置为On时，若有赋值语句发生精度损失，VB.NET编译器就会显示出错信息
Module Module1

    Sub Main()

        Dim s1 As String = "Hello my Friend"
        Console.WriteLine("s1中包含的字符串为：" & s1)
        Console.WriteLine("字符串s1的长度为：" & s1.Length)
        Dim s2 As String = String.Copy(s1)
        Console.WriteLine("s2中包含的字符串为：" & s2)
        Console.WriteLine("s1中索引为9的字符为：" & s1.Chars(9))

        '用=比较字符串是否相等时，实际上VB.NET编译器生成的就是调用Equals代码
        If s1 = s2 Then
            Console.WriteLine("s1=s2")
        End If
        Console.WriteLine("s1.Equals (s2)返回的结果为：" & s1.Equals(s2))

        'String实例是不可改变的，s1.Substring(9, 6)实际上是创建并返回了一个新的String实例，并未改变s1的值
        Console.WriteLine("s1.Substring(9, 6)返回的结果为：" & s1.Substring(9, 6))
        Console.WriteLine("用our替换s1中的my后得到的新字符创为：" & s1.Replace("my", "our"))
        Console.WriteLine("替换后s1中包含的字符串为：" & s1)
        Console.WriteLine("在s1第9个位置插入字符串new后的新字符串为：" & s1.Insert(8, " new"))
        Console.WriteLine("s1.StartsWith (hey)返回的结果为：" & s1.StartsWith("hey"))
        Console.WriteLine("s1.EndsWith(Friend)返回的结果为：" & s1.EndsWith("Friend"))
        Console.WriteLine("将s1中的所有字符全部转换为大写字母为：" & s1.ToUpper())
        Console.WriteLine("将s1中的所有字符全部转换为小写字母为：" & s1.ToLower())
        Console.WriteLine("s1中第一次出现my的位置是：" & s1.IndexOf("my"))

        Dim i As Integer = 12345
        'ToString()方法是将一个数值类型的数据转换为字符串类型，调用Convert的方法可以忽略赋值时出现精度损失的出错信息
        Console.WriteLine("Convert.ToString(i)的结果为：" & Convert.ToString(i))
        Dim ss As String = "12345"
        Console.WriteLine("Convert.ToInt32(j)的结果为：" & Convert.ToInt32(ss))
        Console.ReadLine()
    End Sub

End Module

---运行结果为：

http://s6/bmiddle/6d18c142gc74fc979ebf5&690