Privata underForm_Timer ()
'10: 00 FÖRMIDDAG = 0.41667
'1: 00 PM =0.54167
'4: 00 PM= 0.66667
Dunkel strDate som daterar
strDate = formaterar (nu, ”mm-/dd/yyyyH: n”)
Om strDate = formaterar ((datera + 0.41667), ”mm-/dd/yyyyH: n”) eller strDate = formaterar ((datera + 0.54167), ”mm-/dd/yyyyH: n”) eller strDate = formaterar ((datera + 0.66667), ”mm-/dd/yyyyH: n”) därefter
'Gör något
Avsluta om
Avsluta suben
|