- جۇغلانما
- 1272
تىزىملاتقان2012-8-15
ئاخىرقى قېتىم1970-1-1
توردا سائەت
دوست
|
ئاددىي ئىككى خىل ئۇسۇلنى قالدۇرۇپ قوياي.
1.API ئارقىلىق قويۇش
- Public Declare 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
- Dim mstrfileName As String = application.startUpPath+"/mouseMusic/call.wav"
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- PlaySound(mstrfileName, 0, SND_FILENAME)
- End Sub
مەزمۇننى كۆچۈرۈۋېلىش
2. My.Computer.Audio.Play ئارقىلىق قويۇش
- Dim fileName as String = application.StartUpPath+"/mouseMusic/1.mp3"
- My.Computer.Audio.Play("C:\audio.wav", AudioPlayMode.Background)
- My.Computer.Audio.Stop()
مەزمۇننى كۆچۈرۈۋېلىش |
|