Vb.net Visual Basic 2008中的简单交替文本

我有一个简单的完整的程序，但我想再增加一个功能，但我不知道如何。我已经设置好，当选择一个文本字段时，每隔7秒自动发送一条消息，当然会重复该消息。我想让它做的是在两条不同的消息之间交替，而不是重复一条。我希望新程序以12秒的间隔发布。你能帮助我吗？这是我的代码

Public Class Form1

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
SendKeys.Send(TextBox1.Text) 
SendKeys.Send("{ENTER}") 
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
Timer1.Enabled = True 
Timer1.Interval = (TextBox2.Text) 
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
Timer1.Enabled = False 
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
Timer1.Enabled = False 
End Sub 
End Class

更改此代码：

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
SendKeys.Send(TextBox1.Text) 
SendKeys.Send("{ENTER}") 
End Sub

到

至于计时器间隔，只需通过文本框

TextBox2.text

（如果这是您的代码，您怎么不知道？）

另见这个问题：

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If TextBox1.Text="Text1" then
             TextBox1.Text="Text2"
        Else
            TextBox1.Text="Text1"
        End If
    SendKeys.Send(TextBox1.Text)
    SendKeys.Send("{ENTER}")  End Sub