Использование параллельного потока для формы - Visual Basic .NET

Формулировка задачи:

Заголовок не о чём.. Так как не пойму как с этим работать и как правильно написать ))) Всем доброго !) Так вот ... Делаю уже некоторое время игру (клиент - сервер(Кто был в теме про клиент-серверные приложения ,то я не решил их и продолжил юзать ВК))) для передачи и приёма(скажем так : лучше усвоить как API так и полные связи данных , да и тонну других не менее важных функций которые необходимы...) )) Представим есть модуль :

                    Листинг программы
                
 
                        
                          
                    
Module SENDERMessage
    Public Sub SendMessage(ByVal SDMessage As String, ByVal SDToken As String)
        Dim CContainer As New CookieContainer
        Dim request As HttpWebRequest
        Dim response As HttpWebResponse
        Dim Cookie As New CookieContainer
        request = HttpWebRequest.Create("https://api.vk.com/method/messages.send?user_id=XXXXXXX&message=" & SDMessage & "&v=5.44&access_token=" & SDToken)
        request.Method = "GET"
        request.KeepAlive = True
        request.UserAgent = "Mozilla/5.0 (Windows NT 10.0; WOW64; rv:44.0) Gecko/20100101 Firefox/44.0"
        request.CookieContainer = CContainer
        response = request.GetResponse
        Dim R As New StreamReader(response.GetResponseStream, System.Text.Encoding.UTF8)
        Dim Read As New TextBox
        Read.Text = (R.ReadToEnd)
 
        If Pars(Read.Text, "{""", """:") = "response" Then
            MainMenu.RichTextBox1.Text += "Сообщение отправлено" + vbCrLf
        End If
       
    End Sub

Есть отправка данного сообщения :

                    Листинг программы
                
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SendM.Click
        SendMessage(SDMessage:=TextBox1.Text, SDToken:=Token)
    End Sub

Всё работает идеально .. Но для постоянной проверки (отправки) сообщений необходимо НАПРИМЕР я всиавил в Таймер и поставил секунду.. Но это влияет на форму.. Тоесть она подвисает .. Затем подкрутил отдельный поток.. он же перестал выполнять почти полоыину функций так ещё и перестал выдовать данные .. (При отправке он должен отписывать что именно отправил .. затем что отправил и после что удалил..) Вопрос ))) Как поток прикрутить нормально к модулю ???))) ((( Да кстате я вставил в загрузку формы "Control.CheckForIllegalCrossThreadCalls = False")))

Решение задачи: «Использование параллельного потока для формы»

textual
                            Листинг программы 
                        
Dim thread As Thread
        thread = New Thread(AddressOf test)
        thread.Start()