تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
معرفة نوع القرص
#1
السلام عليكم

اطلب كود لمعرفة نوع القرص هل هو مرن او ليزري او صلب
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام
ضع على الفورم صندوقي نص text
وزر commandButton
وانسخ الكود والصقه وغير حرف القرص
PHP كود :
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

Private Sub Command1_Click()
    
Me.AutoRedraw True
    Select 
Case GetDriveType(Text1.Text ":\")
        Case 2
            Text2.Text = "
ÞÑÕ ÞÇÈá ááÇÒÇáÉ"
        Case 3
            Text2.Text = "
ÞÑÕ ÕáÈ"
        Case Is = 4
            Text2.Text = "
ÞÑÕ ÞÇÈá ááÇÒÇáÉ"
        Case Is = 5
            Text2.Text = "
ãÍÑß ÇÞÑÇÕ áíÒÑ"
        Case Is = 6
            Text2.Text = "
ÞÑÕ ÐÇßÑÉ ÇáæÕæá ÇáÚÔæÇÆí"
        Case Else
            Text2.Text = "
ÛíÑ ãÚÑæÝ"
    End Select
End Sub

Private Sub Form_Load()
Text1.Text = "
C"
End Sub 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة: asto , ناجي إبراهيم
#3
مشكور جدا اخي Lion_Ksa
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طلب طريقة معرفة عدد الصفوف الفرغه في عمود معيين MSFlexGrid ahmed201 7 2,124 08-01-21, 11:31 PM
آخر رد: سعود
  اداة vbflexgrid13.ocx شبيه بالاداة العادية بحاجة الى معرفة اكثر gonm64 2 1,392 04-11-19, 05:34 PM
آخر رد: gonm64
  [vb6.0] المساعدة في معرفة عدد القوائم وادي العوضي 11 2,693 26-10-19, 01:19 AM
آخر رد: asemshahen5
  [مشروع] تعديل كود معرفة اللاسماء الغير موجودة في جدول mustafa mohamed 3 1,787 16-07-19, 04:23 PM
آخر رد: mustafa mohamed
  [سؤال] معرفة اسماء الجداول الموجودة داخل قاعدة بيانات أبوسعود 5 4,105 15-05-17, 11:28 PM
آخر رد: Ahmed_Mansoor
Wink هل من مساعد في معرفة نسخ أسطر محددة؟؟؟ KamelArab 4 2,453 25-11-16, 08:04 PM
آخر رد: KamelArab
  مساعدة في كود معرفة الشهر الحالي وتاريخ أوله وتاريخ نهايته tighrmte 2 2,291 20-02-16, 10:45 PM
آخر رد: tighrmte
  معرفة آخر تعديلات تمت فى البرنامج اسلام الكبابى 10 4,197 08-10-15, 07:08 PM
آخر رد: اسلام الكبابى
  معرفة نسخة الجهاز عبدالله الصافي 2 1,905 03-07-15, 01:54 AM
آخر رد: عبدالله الصافي
  هل من الممكن معرفة عدد مرات تشغيل البرنامج superwoofer 1 1,828 29-01-15, 06:40 AM
آخر رد: Ahmed_Mansoor

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


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