تقييم الموضوع :
  • 1 أصوات - بمعدل 3
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مطلوب معرفة اسم مشغل الاقراص
#1
اخواني الاعضاء اسعد الله اوقاتكم

نبحث عن كود معرفة اسم مشغل الاقراص هل هو H او G او اي كان ووضعة في تكست 1
واذا كان هناك اكثر من مشغل وضع اسم المشغل التاني في تكست 2

ولكم كل الشكر والعرفان
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

ضع هذا الكود في زر بوتون

كود :
TextBox1.Text = ""
        TextBox2.Text = ""
        Dim cd = From d In IO.DriveInfo.GetDrives() Where d.DriveType = IO.DriveType.CDRom Select d
        For Each a In cd
            If TextBox1.Text = "" Then
                TextBox1.Text = a.ToString
            Else
                TextBox2.Text = a.ToString
            End If
        Next
الرد }}}}
تم الشكر بواسطة: nmst70 , ali.alfoly , سعود , kslawy
#3
اشكرك اخي العزيز 3booody على هذة المشاركة
حقا هذا هو المطلوب بعينة اكرر شكري لك ولكل القائمين على هذا المنتدى المفيد

طلب اخير اخي العزيز 3booody وفي نفس المساق

يظهر اسم مشغل الاقراص في التكست بهذا الشكل \:H والمطلوب ان تظهر اسم القرص فقط مثل H فقط

ولك كل الشكر والعرفان
الرد }}}}
تم الشكر بواسطة:
#4
بعد اذن الاخوان احب اضيف الكود اللي اظنه ابسط ويؤدي الغرضSmile

كود :
For Each drive In IO.DriveInfo.GetDrives
            If drive.DriveType = IO.DriveType.CDRom Then
                TextBox1.Text = drive.Name
                TextBox1.Text = TextBox1.Text.Remove(1, 2)
            End If
        Next

رقم 1 هو بداية الحذف وطبعا رقم صفر بيحذف من الاول عشان كذا كتبنا واحد والثاني طول النص المراد حذفه وهو اثنين فقط النقطتين (1) و الشرطة(2)
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: nmst70 , 3booody , kslawy
#5
بارك الله فيك اخي العزيز سعود على هذا التعديل الممتاز
وفعلا هذا ما ابحث عنة بكل دقة
اكرر شكري لك ولكل الاخوة الاعضاء على هذا الجهد الكبير المبذول

والى اللقاء في موضوع اخر يفيد ونستفيد والله الموفق
الرد }}}}
تم الشكر بواسطة: سعود , kslawy
#6
طبعا لو فيه اكثر من محرك cd تكتب صيغة الالحاق Appendtext
كود :
TextBox1.Appendtext(drive.Name & vbnewline)
وتكتب جملة for لتفحص النقطتين والشرطة المائلة لحذفهما
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة: kslawy
#7
بارك الله فيك اخي سعود كلام سليم 100%
كل الشكر والعرفان
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مطلوب تعديلات في هذه الاكواد بحيث تكون فعاله اكثر معتز الجازوي 2 69 28-11-16, 05:36 PM
آخر رد: معتز الجازوي
  [VB.NET] سؤال كيف يمكن معرفة التغير في قاعدة البيانات وليد الزنتاني 2 107 10-11-16, 01:20 AM
آخر رد: وليد الزنتاني
  برنامج مشغل موسيقى اعظم انجاز ليا فى حياتى عايز اخد رأيكم فيه elmobde3 22 2,577 04-11-16, 09:33 PM
آخر رد: زياد مقداد
  [SQL] مطلوب جدول به اصناف محل كمبيوتر ... عاجل MH mekawy 2 103 03-11-16, 04:22 PM
آخر رد: MH mekawy
  معرفة الاشخاص المتصلين بقاعدة البيانات في الشبكة المحلية ببساطة مثل مقاهي الانترنت thevirus 2 123 29-10-16, 06:25 PM
آخر رد: thevirus
Lightbulb المساعدة في معرفة طريقة كتابة الأكواد بشكل صحيح ... Arabia 0 70 26-10-16, 03:18 PM
آخر رد: Arabia
  [سؤال] SQL مطلوب استعلام naden 1 84 22-10-16, 10:07 PM
آخر رد: العواد الصغير
  [سؤال] مطلوب كود يقوم بعمل عداد count naden 5 186 13-10-16, 03:43 AM
آخر رد: الماجيك مسعد
  [سؤال] مطلوب كود لاظهار حرارة المعالج adeeb mark 3 139 04-10-16, 10:26 PM
آخر رد: adeeb mark
  مطلوب رابط لأداة عرض التاريخ الهجري Alshaf3y 0 67 29-09-16, 11:29 PM
آخر رد: Alshaf3y

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


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