Dim ourMsg As SKYPE4COMLib.ChatMessage = Skype.SendMessage("jassm11", "hi")

        System.Threading.Thread.Sleep(1000)

        If ourMsg.Body = "Text" Then

            ourMsg.Body = ""

        End If