URLを別の文字セットに分割し、特定のセットのみをテキストボックスに表示する必要があります

Question

URLをtextbox1にコピーし、button1またはbutton2をクリックして、テキストボックス2のURL表示の一部のみをコピーします。問題は、URLの文字数が常に異なることです。ただし、URLには常に2組の文字が含まれます。 （ "&キー=" と "％9D"）は、これがURLであるとしましょう：

http://apps.beta.com/station/track.php?range= &猫=検査& SUBCAT =つま先&キー= a03e7de9a8d0b9d $$ ceK2U_XZ * 0bNY5 * UFXT ,, 1Ni9_hLIuYmoarj（5-08kwE33x &次= view.php％3FfrHost％3D1256799722％26frId％3Dcv5wgk88og8gkggw％9D6frType％3DToeSize％26key％3Da03e7d0b9d％24％24ceK2U_XZ％9DA0bNY5％2ADT％ 2F2C1NiN_hLIarj％9D85-08kwE33x % 9D

を234f234hj5k332.png私が心配する必要は太字で二つのセクションをマークした。私はButton1を押すと、私はすべてBEFを必要とします"& key ="をtextbox1に表示する（URLには、&というkey =という1組の文字しか含まれません）。私がbutton2を押すと、最後の "％9D"の後のすべてがtextbox2に表示される必要があります（urlは全体を通して複数の場所に "％9D"を持ちます）。

これはシンプルなプロジェクトだと思っていましたが、各URLで文字の数が決して同じではないため、私は自分が望むものを表示するのに問題があります。任意のアイデアどのように私はこれを書くことができますか？

ご協力いただきありがとうございます！

[編集] 私は問題の解決に来て最も近いがこれです：

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    Dim strResults As String 
    strResults = TextBox1.Text 
    TextBox2.Text = strResults.Substring(0, 72) 
End Sub 

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
    Dim strResults As String 
    strResults = TextBox1.Text 
    TextBox2.Text = strResults.Substring(strResults.Length - 18) 
End Sub 

End Class

しかし、正確な数字で、この唯一の作品... "& key ="の前と "％9D"の後の文字数は通常、URLごとに異なります。だから、私のニーズに合うようにこれをどう変更するのか分かりません。

Answer 1

MSDNフォーラムで質問に答えると、右方向に私を指しているのに役立ちました：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    TextBox2.Text = TextBox1.Text.Substring(0, TextBox1.Text.IndexOf("&key=")) 
    TextBox3.Text = TextBox1.Text.Substring(TextBox1.Text.LastIndexOf("%9D") + 1) 

    End Sub 

私は文字がURLではありませんでした場合にエラーを処理するためにいくつかの変更を加えました。 しかし、上記のコードは私がここで尋ねた質問に対する解決策でした。私は、将来誰かが同様の質問をした場合に備えて、ここに解決策を掲載しています。