用VB程序 如何编写一个电子闹钟程序

来源:百度知道 编辑:UC知道 时间:2024/05/15 14:15:09
具体要求:单击按钮插入想要设定的闹钟时间 如果现在的时间超过设定的时间 则音乐响起来 闹钟的铃声是一段音乐 基本就和手机上的闹钟功能差不多就成了 要有详细的源代码 谢谢各位了

Dim a As Integer

Private Sub Command1_Click()
a = Val(InputBox("请输入时间", , "提示"))
End Sub
Private Sub Timer1_Timer()
n = 0
Timer1.Interval = 1000
n = n + 1
If n > a Then

End If

End Sub

详细的源代码 这个不难 但是你也太懒惰了吧

给100分我帮你写。

你自己不会学吗
这么简单