Android Question Chrono Refresh Reset

DonManfred

Expert
Licensed User
B4X:
Sub timerA_Tick
  periode1 = DateUtils.PeriodBetween(DateTime.Now, dataX)
  Dim count As Int = periode1.Minutes*60+periode1.Seconds
    If count >= 0 Then
        label1.Text = periode1.Minutes & ":" & periode1.Seconds
        'If label1.Text = "0:0" Then
    Else
        ToastMessageShow("refresh", False)
    ' to stop use this
        'timerA.Enabled = False 
        '
        ' if you want to reset then you need to set dataX new
        '
        Dim p As Period
        p.Seconds = 10
        dataX = DateUtils.AddPeriod(DateTime.Now, p)
    End If
End Sub
 
Top