[求助]一个很简单的题目
一个很简单的题目，但本人学了才两三天不会做请指教输入以秒为单位表示的时间，编写程序，将其换算成几日几时几秒！！
Dim sec As Long
sec = InputBox("请输入秒数")
Dim h As Long, m As Long, s As Long
h = sec \ 3600
m = sec \ 60 Mod 60
s = sec Mod 60
Print h, m, s
