VB问题 给你一万秒，变成多少小时，多少分，多少秒？

当你输入10000秒时，直接跳出小时，分钟和秒数

Private Sub Command1_Click()

Dim S As Integer

Dim D As Date

S = Int(Text1.Text)

D = TimeSerial(0, 0, S)

MsgBox "共" + CStr(D)

End Sub

• ·我老婆药流后一直流血，都三个月了
• ·请问南昌的朋友南昌市里哪里有保健品专卖增高药哦
• ·深圳判决后的服刑地在哪里？
• ·哪里可以下载N-TEK NuScan1200
• ·五羊本田与雅马哈 两摩托车相比
• ·急！大连 衣架技术专利转让
• ·数据格式含义
• ·我的电脑总是无法保存COMS设置！
• ·我为他心情好差,可他还是不理我
• ·在太原初中毕业N年能考会计证吗？如何考？