Seconds Format

Hi,
Help me out from the below issue,

I want the seconds , Minute as 2 digit format.

My code:

Dim today As new date
Dim S As String
S = today.Hour.ToText+":"+today.Minute.ToText+":"+today.Second.ToText

If the second is 01, xojo display as 1.
I want the output as 01 format.

S = today.Hour.ToText+":"+str(format(today.Minute, “00”))+":"+str(format(today.Second, “00”))

You have many options:
S = today.LongTime
S = today.Hour.ToText+":"+str(format(today.Minute, “00”))+":"+str(format(today.Second, “00”))

dim L as xojo.core.locale=xojo.core.locale.current
S = today.Hour.ToText(l,“00”)+":"+today…Minute.ToText(L,“00”)+":"+today.Second.ToText(L,“00”)

dim today as xojo.core.date=xojo.core.date.current
dim L as xojo.core.locale=xojo.core.locale.current
S = today.ToText(L,xojo.Core.Date.FormatStyles.None,xojo.Core.Date.FormatStyles.Medium)