O mas facil, le pones que valla contando cada vez que pasa por la funcion timer hasta 5 veces:
Saludos
Código [Seleccionar]
Dim vez As Integer
Private Sub Form_Load()
Timer1.Interval = 60000 'El minuto
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
If vez = "5" Then 'si ha pasado 5 veces es que ha pasado 5 minutos
MsgBox "tiempo pasado"
vez = 0
Else
vez = vez + 1
End If
End Sub
Saludos