退出按钮的代码你怎么没输入进去呀?只须一个 Unload Me 不就可以实现了吗?
还有，你那个时间延迟1秒的问题我帮你解决了，就是在 Form_Load 的代码中加上一句 Timer1_Timer 就可以了。因为 Timer 控件是按照它的 Interval 值来触发 Timer 事件的，所以程序启动时并没有触发。

目前你的程序是: 中看不中用，努力。
另外，播放声音文件可以考虑使用 sndPlaySound 函数:
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_FILENAME = &H20000 '附加常量，表示播放指定的文件
Private Const SND_LOOP = &H8 '同上，只是它表示循环播放

别看呆，其实使用它很容易。例如，假设你的声音文件是"C:\a.wav"，那么输入
sndPlaySound "C:\a.wav", SND_FILENAME
就可以实现播放声音了。
你也可以通过这样来循环播放声音文件:

sndPlaySound "C:\a.wav", SND_LOOP