Function to parse querystring into nameValueCollection in VB.Net

Use following function to parse querystring into nameValueCollection and easily retrieve its values using parameter names.

'Get URL with querystring and parse it into NameValueCollection with keys and names.
    Shared Function ParseQueryString(ByVal url As String)
        Dim queryStringBegin As Integer = url.IndexOf("?")
        Dim queryString As String = url.Substring(queryStringBegin + 1)
        Dim nvc As System.Collections.Specialized.NameValueCollection = New System.Collections.Specialized.NameValueCollection
        Dim sections() As String = queryString.Split("&")
        For Each section As String In sections
            Dim pair() As String = section.Split("=")
            nvc.Add(pair(0).ToString, pair(1).ToString)
        Next
        Return nvc
    End Function