最近做一个小小的东西，就是从字符串中取出需要的小字符串，以特定的分隔符分割开的。

        例如：从C:/Inetpub/wwwroot/test/中取出test。

        可以使用split进行分割：

        Dim Names As String()       ‘字符串数组
        Names = Me.Context.Parameters.Item(“dir”).Split(“/”)
        Dim j As Integer
        Dim SiteName As String = “”

        For j = 0 To Names .Length – 2
            If j = Names .Length – 2 Then
                SiteName = Names (j)
            End If
        Next

        这样，取出的SiteName就是所需的字符串test