سجل في المعهد لتفعيل روابط التحميل

للتسجيل اضغط على الزر التسجيل
ندعم منتديات vBulletin بتقنية Css3
A L 6 W E R
   [ 1 ]
19-06-2015, 03:16 PM
شركة شام للبرمجيات
749
الصورة الرمزية لـ غزوان خليل
غزوان خليل
غير متواجد
[ مطوّر مشارك ]

اسمي : غزوان خليل , من : سوريا , أهتم بـ البرمجة وتعديل البرامج .
تاريخ الإنضمام23-01-2011 عدد المشاركات99 تقييم المستوى126 الدولةsyria
  تم شكره 4 مرة في 4 مشاركة
افتراضي بخصوص برنامج مشغل الصوتيات والفديو





السلام عليكم اعتذز عن غيابي لكن وضعي الصحي يحتم علي ذلك
عندي مشروع برنامج مشغل الصوتيات والفديو
واريد اكواد للقائمة اوالمفضلة
كود المفضلة القائمة واضافة ملف وحذف ملف لقد اضفة هذة الاكواد

HTML & CSS

   Private Sub ListBox1_DragDrop(sender As ObjectAs DragEventArgsHandles ListBox1.DragDrop
        
If e.Data.GetDataPresent(DataFormats.FileDropThen
            Dim filePaths 
As String() =
           
CType(e.Data.GetData(DataFormats.FileDrop), String())
            For 
Each s As String In filePaths
                Dim FI 
As New IO.FileInfo(s)
                
Dim exten As String =
               
FI.Name.Substring(FI.Name.LastIndexOf(".") + 1FI.Name.Length -
               (
FI.Name.LastIndexOf(".") + 1))
                If 
exten "mp3" Or exten "wmv" Then
                    ListBox1
.Items.Add(s)
                
End If
            
Next
        End 
If
    
End Sub

    
Private Sub ListBox1_DragEnter(sender As ObjectAs DragEventArgsHandles ListBox1.DragEnter
        
If e.Data.GetDataPresent(DataFormats.FileDropThen
            e
.Effect DragDropEffects.Copy
        
Else
            
e.Effect DragDropEffects.None
        End 
If
    
End Sub 
كود اضافة

HTML & CSS

  Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click

        Dim dlg 
As New OpenFileDialog
        dlg
.Filter "All Files|*.(*.wav;*.mp3;*.mp4;*.mpeg;*.dat;*.wma;*.wm v;*.rm;*.ram;*.avi;*.asf;*."
        
If dlg.ShowDialog() = Windows.Forms.DialogResult.OK Then

        End 
If

    
End Sub 

كود حذف ملف

HTML & CSS

   Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        the
.delled()
    
End Sub
End 
Class 
وهذا الكود لتعمل القائمة

HTML & CSS

         Private Sub Form1_Load(ByVal sender As System.ObjectByVal e As System.EventArgsHandles MyBase.Load
    ListBox1
.AllowDrop True
End Sub 

ولكن لم ينحج معي سوى انه فتح زر اضافة ملف لكن دون اضافة الملف على اليست بوكست كما ان كود حذف الملف عندي خطأ







كلمات البحث - معهد المطور

ارشفة, ستايل, كود, هاك, html, css, java, BBcode, seo, php, JavaScript, Product, Style




توقيعي

اعتذر لغيابي المتكرر عن المنتدى وذلك لوضي الصحي

http://www.sham.ga





مواقع النشر (المفضلة)

الكلمات الدلالية (Tags)
مشغل, الصوتيات, بخصوص, برنامج, والفديو

أدوات الموضوع إبحث في الموضوع
إبحث في الموضوع:

البحث المتقدم


المواضيع المتشابهه للموضوع: بخصوص برنامج مشغل الصوتيات والفديو
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
بخصوص برنامج مشغل الصوتيات والفيديو غزوان خليل لغات البرمجة 0 16-05-2014 10:48 AM
[ تعريب ] تعريب برنامج Mp3 Convert Master من ارقى برامج تحويل ملفات الصوت والفديو NJM البرامج العربية والمعربة 5 09-06-2013 01:10 PM
[ حل مشكلة ] بخصوص مشغل صوتيات وفيديو غزوان خليل لغات البرمجة 7 01-05-2013 01:04 PM
[ برنامج ] برنامج MusicCut لقص الصوتيات turky البرامج العامه والشروحات 2 22-11-2011 08:32 AM


الساعة الآن 01:51 AM

RSS RSS 2.0 XML Sitemap1 Sitemap2 HTML Tags اتصل بنا بيان الخصوصية

Powered by vBulletin@Version 3.8.7 .Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
المشاركات والمواضيع تعبر عن رأي كاتبها وليس بالضرورة رأي المطوّر
وجميع الحقوق محفوظة لاصحابها