پخش بدون درد سر صدا در vb.net
میگم من سه ماهیه اینجا عضوم ولی هیچ بهره ای از این سایت نبردم :لبخند: :چشمک:
میگم اگه کسی دنبال پخش بدون درد سره هر گونه صدا در vb هست اول یه این جوری کلاس تعریف کنه
Public Class Sound
Declare Auto Function PlaySound Lib "winmm.dll" (ByVal name _
As String, ByVal hmod As Integer, ByVal flags As Integer) As Integer
Declare Auto Function PlaySound Lib "winmm.dll" (ByVal name _
As Byte(), ByVal hmod As Integer, ByVal flags As Integer) As Integer
Public Const SND_SYNC = &H0 ' play synchronously
Public Const SND_ASYNC = &H1 ' play asynchronously
Public Const SND_MEMORY = &H4 'Play wav in memory
Public Const SND_ALIAS = &H10000 'Play system alias wav
Public Const SND_NODEFAULT = &H2
Public Const SND_FILENAME = &H20000 ' name is file name
Public Const SND_RESOURCE = &H40004 ' name is resource name or atom
End Class
بعدش هر وقت تابع playsound این کلاس را با مسیر و پسوند فایل فراخونی کنید با اون دو پارامتر دیگه :لبخند: صدا براتون پخش میشه
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
OpenFileDialog1.ShowDialog()
Sound.PlaySound(OpenFileDialog1.FileName, 5, 3)
End Sub
by ta hi :چشمک:
نقل قول: پخش بدون درد سر صدا در vb.net
برای توقف چه تابعی رو باید نوشت؟
نقل قول: پخش بدون درد سر صدا در vb.net
سلام
دوست عزیز اگه فقط قصد پخش فایل های wav رو دارید بهتره یه سر به این کلاس بزنید
My.Computer.Audio
نقل قول: پخش بدون درد سر صدا در vb.net
نقل قول:
نوشته شده توسط
فرید نجفلو
سلام
دوست عزیز اگه فقط قصد پخش فایل های wav رو دارید بهتره یه سر به این کلاس بزنید
My.Computer.Audio
چجوری ازش استفاده کنیم؟
نقل قول: پخش بدون درد سر صدا در vb.net
