impostando la proprietà interval del timer a 1000ms puoi usare il seguente codice:
oppure puoi usare intervalli maggiori ma rammenta ke interval accetta solamente valori di tipo Integer.codice:Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick Static Dim secondi As Integer secondi += 1 If secondi = 599 Then secondi = 0 MsgBox("sono passati 10 minuti") End If End Sub