Excel作为数据源 Excel作为数据源'工程->引用->MicrosoftActiveXDataObjects2.XLibraryDimxlConnAsNewADODB.ConnectionDimxlRsAsNewADODB.RecordsetDimstrConnAsStringDimxlCntAsInteger..
代码3行代码播放wav 3行代码播放wav 'API声明 Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _ (ByVal lpszSoundName As String, ByVal uFlags As Long) A