・なので、自作した実装で処理する。
・特殊なものは使わず、シンプルな処理で実装する例を以下に示す。
使い方
Dim uri_obj = New Uri(url)
Dim queryValues = New Dictionary(Of String, String)
Dim query = Uri.UnescapeDataString(uri_obj.Query.Replace("?", ""))
Dim tmp_arr = query.Split("&")
For Each tmp_word In tmp_arr
Dim tmp = tmp_word.Split("=")
queryValues.Add(tmp(0), tmp(1))
Next
Dim data = queryValues["キー名を指定"]