تشغيل ملف فيديو على الفيجوال بيسيك

الملتميديا -
تشغيل ملف فيديو



درس اليوم سوف يعجبك كثيراً إذا فهمت الأساسيات وفكرت قليلاً سوف تعمل أجمل برنامج
لفتح ملفات الصوت والصورة.

سوف نتعامل مع عنصر تحكم جاهز هو Windows Media Player
وتعرف كيف تضيفه . عن طريق زر يمين فوق صندوق الأدوات

اختر Windows Media Player وأنقر
Ok فتظهر أيقونته على صندوق الأدوات . ضعه بعد ذلك على
الفورم وضع الأدوات التالية:

أدوات عرض الملفات Drive1 و Dir1 و File1

وأضف أداة النصوص Label1

لاحظ الصورة: عنصر Windows Media Player هو الذي في الأسفل.

On Error Resume Next Dir1 = Drive1

وهذا يقوم بعرض المجلدات الموجودة داخل المحرك المحدد

2- أنقر فوق أداة المجلدات Dir1 وأكتب الكود التالي:

File1 = Dir1

وهو يقوم بعرض الملفات في المجلد المحدد داخل أداة الملفات
File1

3- أنقر فوق صندوق الملفات وأكتب السطر الأسطر التالية

Label1 = Dir1 + '\' + File1 MediaPlayer1.FileName = Label1

السطر الأول لعرض مسار الملف والسطر الثاني لتشغيل الملف



كما قلنا أنه يمكنك إضافة ازرار خاصة للعمل.ويمكنك إضافة الأحداث

مثلا

MediaPlayer1.Pause MediaPlayer1.Play MediaPlayer1.Stop

مشكو وانا جربت هذه التجربة ونجحت