تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب بسيط محتاج ملف DLL
#11
(23-08-19, 04:52 AM)محمد اسماعيل كتب : هذا الكود يوضع بالكلاس ؟

نفس طريقة الكود الخاص بيك

تم اخى العزيز بارك الله فيك
الرد }}}
تم الشكر بواسطة: asemshahen5
#12
(23-08-19, 05:02 AM)خالد كامل1 كتب :
(23-08-19, 04:52 AM)محمد اسماعيل كتب : هذا الكود يوضع بالكلاس ؟

نفس طريقة الكود الخاص بيك

كما ترى اخى الكود به شئ خطأ فو سمحت تكتبه كاملا من عند ال CLASS

الكود بالكلاس كامل


كود :
Imports System.Management

Public Class Class1

   Public Shared MOTHERBOARDID As String

   Public Shared Sub hardware()
       Dim MOS As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
       For Each getserial As ManagementObject In MOS.[Get]()
           MOTHERBOARDID = getserial("SerialNumber").ToString()
       Next
   End Sub
End Class


بوتن  زر ورسالة الاستعادة الرقم


كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Class1.hardware()
       MsgBox(Class1.MOTHERBOARDID)
   End Sub
الرد }}}
#13
(23-08-19, 05:15 AM)محمد اسماعيل كتب :
(23-08-19, 05:02 AM)خالد كامل1 كتب :
(23-08-19, 04:52 AM)محمد اسماعيل كتب : هذا الكود يوضع بالكلاس ؟

نفس طريقة الكود الخاص بيك

كما ترى اخى الكود به شئ خطأ فو سمحت تكتبه كاملا من عند ال CLASS

الكود بالكلاس كامل


كود :
Imports System.Management

Public Class Class1

   Public Shared MOTHERBOARDID As String

   Public Shared Sub hardware()
       Dim MOS As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
       For Each getserial As ManagementObject In MOS.[Get]()
           MOTHERBOARDID = getserial("SerialNumber").ToString()
       Next
   End Sub
End Class


بوتن  زر ورسالة الاستعادة الرقم


كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Class1.hardware()
       MsgBox(Class1.MOTHERBOARDID)
   End Sub
اخى العرير الذى لا يبخل عن الاعضاء بشئ عوضك الله عن تعبك معى ومعهم بكل خير
لى طلب اخر فى هذا الشأن 
ان تشرح لى كيفيه ضع عدد رات تشغيل البرنامج ايضا المده التجربيه  شرحا وافيا وكافيا كى ادرك ما تقول فأخيك مبتدئ وانتم اساتذتنا 
والشرح بهذه الاكواد  التى وضعناها من اول المشاركه
سدد الله خطاك واكرمك
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#14
(23-08-19, 06:14 PM)خالد كامل1 كتب :
(23-08-19, 05:15 AM)محمد اسماعيل كتب :
(23-08-19, 05:02 AM)خالد كامل1 كتب :
(23-08-19, 04:52 AM)محمد اسماعيل كتب : هذا الكود يوضع بالكلاس ؟

نفس طريقة الكود الخاص بيك

كما ترى اخى الكود به شئ خطأ فو سمحت تكتبه كاملا من عند ال CLASS

الكود بالكلاس كامل


كود :
Imports System.Management

Public Class Class1

   Public Shared MOTHERBOARDID As String

   Public Shared Sub hardware()
       Dim MOS As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
       For Each getserial As ManagementObject In MOS.[Get]()
           MOTHERBOARDID = getserial("SerialNumber").ToString()
       Next
   End Sub
End Class


بوتن  زر ورسالة الاستعادة الرقم


كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Class1.hardware()
       MsgBox(Class1.MOTHERBOARDID)
   End Sub
اخى العرير الذى لا يبخل عن الاعضاء بشئ عوضك الله عن تعبك معى ومعهم بكل خير
لى طلب اخر فى هذا الشأن 
ان تشرح لى كيفيه ضع عدد رات تشغيل البرنامج ايضا المده التجربيه  شرحا وافيا وكافيا كى ادرك ما تقول فأخيك مبتدئ وانتم اساتذتنا 
والشرح بهذه الاكواد  التى وضعناها من اول المشاركه
سدد الله خطاك واكرمك

قناتنا على اليوتوب
الرد }}}
#15
(23-08-19, 06:14 PM)خالد كامل1 كتب :
(23-08-19, 05:15 AM)محمد اسماعيل كتب :
(23-08-19, 05:02 AM)خالد كامل1 كتب :
(23-08-19, 04:52 AM)محمد اسماعيل كتب : هذا الكود يوضع بالكلاس ؟

نفس طريقة الكود الخاص بيك

كما ترى اخى الكود به شئ خطأ فو سمحت تكتبه كاملا من عند ال CLASS

الكود بالكلاس كامل


كود :
Imports System.Management

Public Class Class1

   Public Shared MOTHERBOARDID As String

   Public Shared Sub hardware()
       Dim MOS As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
       For Each getserial As ManagementObject In MOS.[Get]()
           MOTHERBOARDID = getserial("SerialNumber").ToString()
       Next
   End Sub
End Class


بوتن  زر ورسالة الاستعادة الرقم


كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Class1.hardware()
       MsgBox(Class1.MOTHERBOARDID)
   End Sub
اخى العرير الذى لا يبخل عن الاعضاء بشئ عوضك الله عن تعبك معى ومعهم بكل خير
لى طلب اخر فى هذا الشأن 
ان تشرح لى كيفيه ضع عدد رات تشغيل البرنامج ايضا المده التجربيه  شرحا وافيا وكافيا كى ادرك ما تقول فأخيك مبتدئ وانتم اساتذتنا 
والشرح بهذه الاكواد  التى وضعناها من اول المشاركه
سدد الله خطاك واكرمك

اكرمك  الله وحفظك .

جميعنا اخوة في منتدانا الغالي وانا طالب علم وليس اكثر  .

من الافضل ليك الاستفسار الجديد يطرح كسؤال جديد ربما يقتصر علمي علي الرد عليك فيفدك من كثر علمة عني او تجد عدة اراء مختلفة  تصل بك لاكثر فائدة .
الرد }}}
تم الشكر بواسطة: asemshahen5 , ابراهيم ايبو


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 163 04-03-24, 07:15 AM
آخر رد: new_programer
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  [VB.NET] محتاج كود حساب الفرق بين تاريخين بالايام moustafakamel95 3 449 29-01-24, 04:05 PM
آخر رد: مصطفى مصطفى
  سؤال بسيط يا احبتى فى الله خالد كامل1 4 314 07-01-24, 12:55 AM
آخر رد: Mujahef
Tongue استفسار بسيط عن كريستال ريبورت waataanys 1 311 30-11-23, 04:44 PM
آخر رد: Taha Okla
  [VB.NET] محتاج مساعدة تعديل على كود ZEEN4ZEEN 4 416 08-10-23, 09:11 PM
آخر رد: ZEEN4ZEEN
  محتاج تعديل على سورس كود - حفظ البيانات بدون قاعدة بيانات new_programer 5 628 30-08-23, 12:21 AM
آخر رد: atefkhalf2004
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 349 05-08-23, 02:29 PM
آخر رد: moh61
  اريد ارسال pdf عبر واتساب عن طريق ال API محتاج تعديل على الكود moh61 0 518 03-08-23, 03:41 PM
آخر رد: moh61
  محتاج تحويل السورس كود من C#الى فيجوال ستوديو new_programer 3 642 13-05-23, 03:28 AM
آخر رد: أبووسم

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


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