تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] محتاج مساعده في برنامج لتشغيل الملفات الصوتية
#1
السلام عليكم انا بصمم برنامج لتشغيل الملفات الصوتية بس واقف قدامي حاجه واحده انا عامل قائمة تشغيل( play list (listbox وعايز كود يسمح لي بنقل الملفات الي listbox عن طريق مؤشر الموس بحيث يظهر لي في listbox مسار  الملف


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
(21-01-16, 04:21 PM)مدحت رمضان كتب : عايز كود يسمح لي بنقل الملفات الي listbox عن طريق مؤشر الموس بحيث يظهر لي في listbox مسار  الملف

هذا الكود
PHP كود :
Imports System.IO
Public Class Form1
    Private Sub ListBox1_DragDrop
(sender As ObjectAs DragEventArgsHandles ListBox1.DragDrop
        Dim files
() As String e.Data.GetData(DataFormats.FileDrop)
 
       ListBox1.Items.Clear()
 
       For Each file In files
            If Path
.GetExtension(file) = ".mp3" Then ListBox1.Items.Add(file)
 
       Next
    End Sub
    Private Sub ListBox1_DragEnter
(sender As ObjectAs DragEventArgsHandles ListBox1.DragEnter
        e
.Effect DragDropEffects.Copy
    End Sub

    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        ListBox1
.AllowDrop True
    End Sub
End 
Class 
فقط قم بسحب الملفات والقائها على الـListBox   Wink
الرد }}}}
تم الشكر بواسطة: VB_Local
#3
(21-01-16, 05:43 PM)HASAN6.0 كتب :
(21-01-16, 04:21 PM)مدحت رمضان كتب : عايز كود يسمح لي بنقل الملفات الي listbox عن طريق مؤشر الموس بحيث يظهر لي في listbox مسار  الملف

هذا الكود
PHP كود :
Imports System.IO
Public Class Form1
    Private Sub ListBox1_DragDrop
(sender As ObjectAs DragEventArgsHandles ListBox1.DragDrop
        Dim files
() As String e.Data.GetData(DataFormats.FileDrop)
 
       ListBox1.Items.Clear()
 
       For Each file In files
            If Path
.GetExtension(file) = ".mp3" Then ListBox1.Items.Add(file)
 
       Next
    End Sub
    Private Sub ListBox1_DragEnter
(sender As ObjectAs DragEventArgsHandles ListBox1.DragEnter
        e
.Effect DragDropEffects.Copy
    End Sub

    Private Sub Form1_Load
(sender As ObjectAs EventArgsHandles MyBase.Load
        ListBox1
.AllowDrop True
    End Sub
End 
Class 
فقط قم بسحب الملفات والقائها على الـListBox   Wink
شكرا علي الاجابة المفيده
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] فكرة عمل برنامج تنبيهات abdulla2 1 78 20-02-17, 12:47 AM
آخر رد: EnormousSoft
  سؤال حول تخزين الملفات abudawoodd 7 103 17-02-17, 11:59 PM
آخر رد: abudawoodd
  [كود] كود برنامج chat متعدد المستخدمين YazanOtoum 2 61 17-02-17, 11:54 PM
آخر رد: احمد مهران
  [سؤال] حل مشكلة برنامج لتغير التاريخ عبدالرحمن المكاوي 6 141 17-02-17, 11:19 PM
آخر رد: EnormousSoft
Thumbs Up [سؤال] كود تخطي فتح رابط معين لتشغيل البرنامج Mk 22353 1 58 17-02-17, 02:43 AM
آخر رد: الماجيك مسعد
  تصميم برنامج امتحان الاوفيس والويندوز القيصر بيلا 0 50 12-02-17, 03:07 PM
آخر رد: القيصر بيلا
  طلب برنامج لزيادة دقة الصور احمد علي احمد سلمان 1 80 10-02-17, 05:33 PM
آخر رد: مساعدة
  اخفاء برنامج بعد استدعائه وتشغيله moshax 4 117 07-02-17, 09:53 PM
آخر رد: moshax
Question [سؤال] محتاج طريقة لعرض الأسماء المكررة في الداتا بيز refaat130 3 96 06-02-17, 07:50 PM
آخر رد: sendbad100
Heart [VB.NET] احتاج الى مساعدة في برنامج لمحل لحساب الفاتورة malek369 1 178 06-02-17, 02:44 AM
آخر رد: ٌRy SAEED

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم