منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

وعليكم السلام
ضع هذا الكود في حدث الــ Load الخاص بالفورم

واستبدل حرف الــ F باسم الملف الصوتي لديك

(09-05-20, 01:46 AM)سامي محمد كتب : [ -> ]وعليكم السلام
ضع هذا الكود في حدث الــ Load الخاص بالفورم

كود :

 My.Computer.Audio.Play(My.Resources.F, AudioPlayMode.Background)

واستبدل حرف الــ F باسم الملف الصوتي لديك

السلام عليكم











هذه عدة طرق اخرى

(09-05-20, 02:32 AM)علي بنيان كتب : [ -> ]السلام عليكم

PHP كود :

Public Class Form1

    Public Declare Function mciExecute Lib _
    "winmm.dll" Alias "mciExecute" _
    (ByVal lpstrCommand As String) As Long

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        mciExecute("play FileName.mp3")

    End Sub
End Class

'2-تشغيل ملفات Mp3 


PHP كود :

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        My.Computer.Audio.Play _
        ("FileName.wav", AudioPlayMode.Background)

    End Sub

'3-تشغيل ملفات wav 


PHP كود :

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim ply As New System.Media.SoundPlayer("FileName.wav")
        ply.Play()

    End Sub 


هذه عدة طرق اخرى