启动程序伴随音乐(VB6.0源代码编写)PrivateDeclareFunctionsndPlaySoundLib"winmm.dll"Alias"sndPlaySoundA"(ByVallpszSoundNameAsString,ByValuFlagsAsLong)AsLongConstSND_ASYNC=&H1PrivateSubForm_Load()sndPlaySoundApp.Path+"\PY.WAV",&H1EndSub