''''''''''' WAV/wma背景音樂(lè)
創(chuàng)新互聯(lián)公司專注于鐵力企業(yè)網(wǎng)站建設(shè),自適應(yīng)網(wǎng)站建設(shè),電子商務(wù)商城網(wǎng)站建設(shè)。鐵力網(wǎng)站建設(shè)公司,為鐵力等地區(qū)提供建站服務(wù)。全流程定制網(wǎng)站,專業(yè)設(shè)計(jì),全程項(xiàng)目跟蹤,創(chuàng)新互聯(lián)公司專業(yè)和態(tài)度為您提供的服務(wù)
Public Class Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As New Media.SoundPlayer
a.SoundLocation = "c:\windows.wav"
a.PlayLooping()
End Sub
End Class
給你個(gè) 很簡(jiǎn)單的
Public Class Form1
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
‘ 聲明函數(shù) mciexcute 加入庫(kù) winmm.all
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call mciExecute("play E:\music\music\單身情歌.wma ")
'在 formload過(guò)程中 調(diào)用函數(shù) mciexcute 里面 是 文件 路徑
End Sub
End Class
需要用到COM控件,例如media player、Real player等,或者用 .NET 自帶的類庫(kù) System.Media下面的 SoundPlayer來(lái)播放音樂(lè)
推薦到一個(gè)人的百度空間里去看,
里面有DirectSound的教程
還有DirectInput、DirectDraw的教程
但是DirectSound只能播放wav
如果想播放像mp3、ogg之類的音樂(lè),你可以使用AudioVideoPlayback