> ①の送信は、次のコードで行っています。

TextBox1.Text の内容を変数 strSend に代入しなくて良いのでしょうか?
変数 strSend には値が代入されておらず、Nothing のままのようですが…。