[طالب برمجة]

PHP كود :

Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click
    Timer1.Interval = 120000
    Timer1.Start()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    If TAB.SelectedIndex < TAB.TabCount - 1 Then
        TAB.SelectedIndex += 1
    Else
        TAB.SelectedIndex = 0
    End If
End Sub