環境：VB.NET

テキストボックスの中から例えば"ABCD"という文字列から"EFGH"という文字列までを検索し
"ABCD"から"EFGH"までの全ての文字列を抽出したいのですが、
現在は
変数X = "ABCD"
変数Y = "EFGH"
変数a = InStr(TextBox1.Text, 変数X)
変数b = InStr(TextBox1.Text, 変数Y)
If 変数a > 0 And 変数b > 0 Then
変数c = 変数b - 変数a
TextBox1.Select(変数a , 変数c + 5)
変数P = TextBox1.SelectedText
Label1.Text = 変数P
という感じでやっているのですが、こうすると大文字と小文字の区別が付かなくて、
"ABCD"≠"abcd"となります。
大文字と小文字の区別無く抽出したいのですが、どうすれば良いのでしょうか？

見にくかったり、意味不明だったらすいません。