46.WAVファイルを再生する



< 使用用途 >
WAVファイルを再生する

今回のサンプルソースをダウンロードする方は下記の「ダウンロード」を!
   => ダウンロード ・・・下記のサンプルと同じです。


< 説明 >
API関数のsndPlaySound を使用します。
sndPlaySound =>WAVファイルを再生する
  <引数>
    lpszSoundName:再生したいWAVファイルのパスを指定する
  @戻り値@  
      正常終了1


< SAMPLE >
'ここではWAVファイルを再生する
'標準モジュール
Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String,ByVal uFlags As Long) As Long

'ここからはフォームの処理
Private Sub Command1_Click()
 Dim Ret As Long
  Ret = sndPlaySound("c:\windows\media\Chimes.wav",0)
End Sub





API 技術関連のページへ戻る

ホーム PV ランキング