Se podra realizar un timer de este tipo sin usar apis

[tablarock]

Hola, he estado intento algunas cosas para lograr lo que deseo pero sin buenos resultados ya que no soy muy entendido con este lenguaje.

Deseo que la "funcion" c.SendMessagese envie con un retraso de X segundos. Espero me puedan ayudar con esto, por mientras seguiré investigando. Gracias por su ayuda.

Código:

    Private Sub oSkype_MessageStatus(pMessage As ChatMessage, Status As TChatMessageStatus) Handles oSkype.MessageStatus
        If Status = TChatMessageStatus.cmsReceived Or Status = TChatMessageStatus.cmsSent Then
            Dim msg As String = pMessage.Body
            Dim c As Chat = pMessage.Chat

            If msg.StartsWith(Trigger) Then
                LstBox.Items.Add(DateTime.Now.ToLongTimeString() + ":" + "command " + "'" + msg + "'" + "form " + pMessage.Sender.Handle)
                msg = msg.Remove(0, 1).ToLower
                c.SendMessage("Esto no es un comando1")
                c.SendMessage("Esto no es un comando2")
                c.SendMessage("Esto no es un comando3")
                c.SendMessage("Esto no es un comando4")
            End If
        End If
    End Sub