2个回答
展开全部
'=====放在标准模块中
public Declare Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Long
'下面是执行代码需要那个窗口播放就直接执行。。===============
Private Sub Form_Load()
Call PlaySound("D:/1.wav", 0, 0)
End Sub
public Declare Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Long
'下面是执行代码需要那个窗口播放就直接执行。。===============
Private Sub Form_Load()
Call PlaySound("D:/1.wav", 0, 0)
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询