這課重點講的是鬧鐘迎吵，和播放mp3等功能汰聋。
作業(yè)是設(shè)置鬧鐘到時間后播放30秒即停止播放恩伺。
自主完善課堂源碼：
1：增加判斷時間是否過期功能鹤树。
2：增加鬧鐘啟動反饋信息铣焊。
3：增加鬧鐘到時間反饋信息。
學(xué)習(xí)主要命令：
取現(xiàn)行時間（）
到時間（）
取時間間隔（）
時鐘周期? =? *
播放mp3（）
停止播放（）
延遲（）
附源碼:
.版本 2
.支持庫 spec
.程序集 窗口程序集_啟動窗口
.程序集變量 鬧鐘時間, 日期時間型
.子程序 _按鈕1_被單擊
.局部變量 時間間隔, 整數(shù)型
.局部變量 限行時間, 日期時間型
限行時間 ＝ 取現(xiàn)行時間 ()
鬧鐘時間 ＝ 到時間 (編輯框1.內(nèi)容)
時間間隔 ＝ 取時間間隔 (鬧鐘時間, 限行時間, #秒)
.如果 (時間間隔 ＞ 0)
? ? 標簽1.可視 ＝ 真
? ? 標簽1.標題 ＝ “您設(shè)定的鬧鐘時間為：” ＋ #換行符 ＋ 到文本 (鬧鐘時間) ＋ #換行符 ＋ “鬧鐘已開啟” ＋ #換行符 ＋ “請等待.”
? ? 時鐘1.時鐘周期 ＝ 1000
.否則
? ? 信息框 (“時間已過期”, 0, , )
.如果結(jié)束
.子程序 _時鐘1_周期事件
.局部變量 限行時間, 日期時間型
限行時間 ＝ 取現(xiàn)行時間 ()
.如果真 (鬧鐘時間 ＝ 限行時間)
? ? 子程序1 ()
? ? 時鐘1.時鐘周期 ＝ 0
.如果真結(jié)束
.子程序 子程序1
時鐘1.時鐘周期 ＝ 0
播放MP3 (1, “超級瑪麗.mp3”)
標簽1.標題 ＝ #換行符 ＋ “鬧鐘時間到罕伯！”
_啟動窗口.總在最前 ＝ 真
延遲 (30000)
停止播放 ()
標簽1.可視 ＝ 假
