urgente programmino semplice cronometro

[BOYROMA1]

salve a tutti ho un problemino da risolvere abbastanza urgentemente

devo fare un programmino con un command e 2 text e un timer

appena clicco sul command deve partire un cronometro e visualizzare il tempo su una text1.
nella text2 invece
ogni volta che si raggiungono 10 minuti sulla text1 nella tex2 deve visualizzare e sommare 50 centesimi di euro.

mi aiutate?sono alle prime armi
grazie ancora

[Sypher]

Se intendi in VB6 eccoti un'abbozzo!

Private secondi As Integer
Private inizio As Boolean
Private minuti As Integer
Private conto As Double

Private Sub Command1_Click()
    Timer1.Enabled = True
End Sub

Private Sub Form_Load()
        secondi = 0
        inizio = True
        minuti = 0
        conto = 0
        Timer1.Interval = 1000
        Text1.Text = "0"
End Sub


Private Sub Timer1_Timer()
    secondi = secondi + 1
    inizio = False
    If secondi = 60 Then
        secondi = 0
        minuti = minuti + 1
    End If
     
    If minuti Mod 10 = 0 And minuti > 0 And secondi = 0 Then
        conto = conto + 0.5
        Text2.Text = conto
    End If
    If minuti <> 0 Then
        Text1.Text = minuti & "." & secondi
    Else
        Text1.Text = secondi
    End If
End Sub

Nota del moderatore:
Sypher i tag per il codice

Nota di Sypher:
Li ho messi un secondo dopo