vb.net 中thread timer 多个timer数组控制

在 VB.NET 中，您可以使用 System.Threading.Timer 类和 System.Timers.Timer 类来创建定时器。对于多个定时器，您可以使用一个 Timer 数组来存储它们，并使用一个 for 循环来控制它们。

以下是一个示例代码，使用 System.Timers.Timer 类创建 3 个定时器，并使用 Timer 数组来存储它们：

Imports System.Timers

Public Class Form1
    Private Timers(2) As Timers.Timer

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        For i As Integer = 0 To 2
            Timers(i) = New Timers.Timer()
            Timers(i).Interval = 1000 * (i + 1)
            AddHandler Timers(i).Elapsed, AddressOf Timer_Elapsed
            Timers(i).Start()
        Next
    End Sub

    Private Sub Timer_Elapsed(sender As Object, e As ElapsedEventArgs)
        Dim index As Integer = Array.IndexOf(Timers, sender)
        Debug.WriteLine("Timer " & index & " elapsed.")
    End Sub
End Class

在这个示例中，我们创建了一个名为 Timers 的 Timer 数组，大小为 3。在 Form1_Load 事件处理程序中，我们使用一个 for 循环来创建 3 个 Timer 实例并将它们添加到 Timers 数组中。对于每个 Timer 实例，我们设置它的间隔时间，并将 Timer_Elapsed 方法添加为它的 Elapsed 事件的处理程序。最后，我们启动每个 Timer 实例。

在 Timer_Elapsed 方法中，我们使用 Array.IndexOf 方法来获取 Timer 实例在 Timers 数组中的索引，并在调试窗口中输出 Timer 的索引。