Vb.net 如何使用变量作为计时器的间隔？

我正在创建一个自动程序，我被计时器卡住了。当我启动程序时，它只是说间隔是0

以下是我得到的：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim TextBox1 As String
    Dim URL As String
    Dim Textbox3 As Integer
    Dim i As Integer
    Dim Times As Integer
    Dim Time As Integer
    Dim Textbox2 As Integer
    Dim rampTimer As New Timer
    Dim Tyme As Integer
Restart:
    TextBox1 = URL
    UseProxy(ListBox1.Items.Item(i))
    WebBrowser1.Navigate(URL)
    Tyme = Textbox3 * 1000 * 6
    rampTimer.Interval = Tyme
    rampTimer.Enabled = True
    Time = Times + 1
    If Time = Textbox2 Then
        MsgBox("Done! Made by Laboboy31", "Done")
        GoTo Last
    End If
    Times = Time
    GoTo Restart
Last:
End Sub

---

这里有点疯狂的猜测，但我怀疑你的主要问题是围绕这类事情

Dim TextBox3 as Integer
    Tyme = Textbox3 * 1000 * 6
    rampTimer.Interval = Tyme

现在我猜你的表单上有一个文本框，叫做“textbox3”。 首先将其重命名为有意义的名称，如ClickInterval。以及您将在代码中引用的所有其他windows组件

例程中的TextBox3是使用dim语句声明的整数。因为它是一个整数，它被初始化为0，所以Tyme=0*1000*6，也就是0

如果你有一个名为TextBox3的文本框，那就是组件本身。如果你想要的内容 然后您可以参考TextBox3.Text

最后但并非最不重要的TextBox.Text是一个字符串，所以您需要将其转换为整数（并将其处理为非整数）。 所以，抛开那些模糊的说法，试试看

ramptimer.Interval = Convert.ToInt32(textBox3.text) * 1000 * 6

---

如果我说得对。

这里有点胡乱猜测，但我怀疑你的主要问题是围绕这类事情

Dim TextBox3 as Integer
    Tyme = Textbox3 * 1000 * 6
    rampTimer.Interval = Tyme

现在我猜你的表单上有一个文本框，叫做“textbox3”。 首先将其重命名为有意义的名称，如ClickInterval。以及您将在代码中引用的所有其他windows组件

例程中的TextBox3是使用dim语句声明的整数。因为它是一个整数，它被初始化为0，所以Tyme=0*1000*6，也就是0

如果你有一个名为TextBox3的文本框，那就是组件本身。如果你想要的内容 然后您可以参考TextBox3.Text

最后但并非最不重要的TextBox.Text是一个字符串，所以您需要将其转换为整数（并将其处理为非整数）。 所以，抛开那些模糊的说法，试试看

ramptimer.Interval = Convert.ToInt32(textBox3.text) * 1000 * 6

---

如果我说得对。

哇。自从几十年前在IRC工作以来，我从未见过这么糟糕的代码。你在跟我们开玩笑吗？不，我只是vb.netOh的新手。好。好啊欢迎来到StackOverflow。让我们看看能不能帮你理顺一下。你能解释一下你的代码的用途吗？你想完成什么？我想为我的网站创建一个网站查看器你想做什么？如果你能解释你想做什么，我相信我们能帮上忙。自从几十年前在IRC工作以来，我从未见过这么糟糕的代码。你在跟我们开玩笑吗？不，我只是vb.netOh的新手。好。好啊欢迎来到StackOverflow。让我们看看能不能帮你理顺一下。你能解释一下你的代码的用途吗？你想完成什么？我想为我的网站创建一个网站查看器你想做什么？如果你能解释你想做什么，我相信我们能帮上忙。