求一道VB题目代码

[复制链接]
查看11 | 回复1 | 2009-6-13 13:41:42 | 显示全部楼层 |阅读模式
由键盘输入小时、分、秒,换算成秒,并打印出来。

回复

使用道具 举报

千问 | 2009-6-13 13:41:42 | 显示全部楼层
单击窗体查看效果。============Private Sub Form_Click()Dim h As Byte, m As Byte, s As Byteh = Val(InputBox("时?"))m = Val(InputBox("分?"))s = Val(InputBox("秒?"))Print h * 3600 + m * 60 + s; "秒"End Sub...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行