الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

شنو الغلاط بهذا الكواد

بدأه مبرمج في 14 في 18 يونيو 2010 · 1 رد · 446 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلامـ عليكمـــــــــ ورحمهــــ اللهــ وبركاتهــــــــــــــــــــــ

كيفــــــــــــ الحالـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

إن شاء اللهــــــــــــــــــــــــ مرتاحينـــــــــــــــــــــــــــــــــــــــــــ

شباب شنو الغلاط بهذا الكواد

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button6.Click
Try
opd.InitialDirectory = "my music"
opd.Filter = "Media Files
 الغلاط عند القوس هذا (*.wav;*.mp3;*.mp4;*.mpeg;*.dat;*.wma;*.wmv;*.rm;*.ram;*.avi;*.asf;*.
3gp;*.mov;*.divx;*.swf;*.flv;*.bmp;*.png;*.jpg;*.jepg;*.gif)|*.wav;*.
mp3;*.mp4;*.mpeg;*.dat;*.wma;*.wmv;*.rm;*.ram;*.avi;*.asf;*.3gp;*.mov
;*.divx;*.swf;*.flv;*.bmp;*.png;*.jpg;*.jepg;*.gif|All
Files(*.*)|*.*"
If opd.ShowDialog() = Windows.Forms.DialogResult.OK Then
player.URL = opd.FileName
player.Ctlcontrols.play()
End If
Catch ex As Exception
MessageBox.Show("Some error occur so can't play media",
"Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub
#2

خلاص حليت المشكلة

مواضيع مشابهة