Private Sub Timer1_Timer()
    
    Timer1.Enabled = False
    Timer2.Interval = 你想要的时间间隔
    Timer2.Enabled = True
    
End Sub
Private Sub Timer2_Timer()
    
    Timer2.Enabled = False
    Timer1.Interval = 你想要的时间间隔
    Timer1.Enabled = True
    
End Sub

解决方案 »

  1.   

    Public timm As LongPrivate Sub Form_Load()
        Timer1.Enabled = True
        Timer2.Enabled = False
        timm = 1000 '(你要循环1000次)
    End SubPrivate Sub Timer1_Timer()
            timm = timm - 1
        If timm = 0 Then
            Timer1.Enabled = False
            Timer2.Enabled = True
            timm = 100 '(你要循环100次)
            Else
            '等待
        End If
    End SubPrivate Sub Timer2_Timer()
        timm = timm - 1
        If timm = 0 Then
            Timer2.Enabled = False
            Timer1.Enabled = True
            timm = 1000 '(你要循环1000次)
            Else
            '等待
        End If
    End Sub