Vb.net 后滞后

我有一个代码来制作php文章

    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
    TextBox3.ReadOnly = True
    If TextBox2.Text = ("") Then
    Else
        Dim postData = "msg=" & TextBox3.Text & ": " & TextBox2.Text & "&token=" & TextBox1.Text
        Dim request As WebRequest = WebRequest.Create("http://192.168.2.7/msg.php")
        request.Method = "POST"
        Dim byteArray As Byte() = Encoding.UTF8.GetBytes(postData)
        request.ContentType = "application/x-www-form-urlencoded"
        request.ContentLength = byteArray.Length
        Dim dataStream As Stream = request.GetRequestStream()
        dataStream.Write(byteArray, 0, byteArray.Length)
        dataStream.Close()
        TextBox2.Clear()
    End If
End Sub

但当它运行应用程序时，它是冻结的。当我在本地发送邮件时，它不会这样做。 有什么办法可以防止吗？ 我的完整代码：

---

对代码进行注释。告诉我们它在哪里冷冻和做什么检查我要的pastebinposted@T.S. ......................