你下載一首10分鐘的歌,聽完一邊,就是10分鐘 咕~~(╯﹏╰)b

Option Explicit Dim h As Integer, m As Integer, s As Integer Private Sub Command1_Click() If Not IsNumeric(Text1.Text) Then MsgBox "請正確小時數(shù)！" Exit Sub End If If Not IsNumeric(Text2.Text) Then MsgBox "請正確分鐘數(shù)！" Exit Sub End If If Not IsNumeric(Text3.Text) Then MsgBox "請正確秒數(shù)！" Exit Sub End If h = Text1.Text m = Text2.Text s = Text3.Text If m >= 60 Then MsgBox "分鐘數(shù)必須小于60！" Exit Sub End If If s >= 60 Then MsgBox "秒數(shù)必須小于...