用VB 编写一个程序,将一个时间(以秒为单位)转换成“几小时几分几秒”等形式在1月15日之前做出来,逾期作废越详尽越好

问题描述:

用VB 编写一个程序,将一个时间(以秒为单位)转换成“几小时几分几秒”等形式
在1月15日之前做出来,逾期作废
越详尽越好

private sub command1_click
dim s as long
s = text1
text2 = s \ 3600 & ":" & (s Mod 3600) \ 60 & ":" & (s Mod 3600) Mod 60
end sub
转换出的形式是 h:m:s