variable_con_totales=0

si (condicion){
     variable_con_totales= variable_con_totales + monto_de_esta_condicion
}

si (otra_condicion){
     variable_con_totales= variable_con_totales + monto_de_esta_otra_condicion
}

si (otra_condicion_mas){
     variable_con_totales= variable_con_totales + monto_de_esta_otra_mas_condicion
}

El total a pagar es: variable_con_totales

Private Sub Form_Unload(Cancel As Integer)
    Me.Hide
    Cancel = True
End Sub

Option Explicit

Dim iSegundos As Integer

Private Sub tmrTiempo_Timer()
    If iSegundos = 10 Then
        '// aqui se resetea el tiempo
        iSegundos = 0
        '//coloque aqui lo que quiera, si desea mostrar el form nuevamente, entonces:
        Me.Show
    Else
        iSegundos = iSegundos + 1
    End If
    Me.Caption = iSegundos
End Sub

echo "<a href='index.php?pagina=$seguent#final'>&gt;&gt;</a>&nbsp;&nbsp;";