如何抓取TIME字串(編號:2191)

例如:
t$=time$
a$ = Val(Mid(t$, 7))
Label1.Caption = a$
列印秒的個位數

但是我下這個子令時....
a$ = Val(Mid(t$, 6))
Label1.Caption = a$
卻列印十位及個位數..........我只需要十位數而已
請問各位先知....要如何分離十位數及個位數ㄋ........