當前位置:編程學習大全網 - 編程軟體 - 誰能告訴我visual studio 2008中VB編程怎樣播放音頻文件?

誰能告訴我visual studio 2008中VB編程怎樣播放音頻文件?

1. 用Win32 API PlaySound

PlaySound位於"winmm.dll"中,可以根據輸入參數的不同,播放WAV類型的音樂。在VB.NET中調用跟VB6中差不多:

先聲明:

Private Declare Auto Function PlaySound Lib "winmm.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer

Const SND_FILENAME As Integer = &H20000

Const SND_ALIAS As Integer = &H10000

Const SND_SYNC As Integer = &H0

具體還有很多常量,不壹壹列舉,下面是播放壹個wav文件的例子

Dim mstrfileName As String = "c:\eagle2.wav"

PlaySound(mstrfileName, 0, SND_FILENAME)

註意上面的播放是非同步的,就是說它並不會播放完畢才結束。如果把上面的代碼寫在壹個Button.Click的事件處理程序中,第二次點擊的時候它會打斷第壹次的播放,重新開始。

當然我們也可以調用系統的聲音:

PlaySound("SystemStart", 0, SND_ALIAS Or SND_SYNC)

' 以同步的方式調用系統啟動時候的聲音。

2. 調用媒體播放器控件

VB.NET中並沒有提供媒體播放器的.NET組件,沒辦法我們還是調用以前Com組件Windows Media Player。當然除了聲音外,還可以播放視頻文件。

首先把媒體播放器控件加到工具欄中,調用還是簡單的寫壹下吧:)

Private Sub playMediaFile(ByVal mediaFileName As String)

With MediaPlayer1

.Stop()

.FileName = "c:\mp3\愛不愛我.mp3"

.Play()

End With

End Sub

  • 上一篇:工業機器人專業就業方向
  • 下一篇:ansys建模方法?
  • copyright 2024編程學習大全網