09-11-23, 10:40 AM
(آخر تعديل لهذه المشاركة : 09-11-23, 10:41 AM {2} بواسطة AhmedEissa.)
السلام عليكم
يبدو أن المحترفون غير متفرغين للرد على أى سؤال
لأن أكثر من موضوع كتبته ، ولا أجد له رداً !!
هى محاولة أخيرة قبل أن أصرف النظر عن الأسئلة هنا
فى هذا الموضوع اقتبست هذا الــ Function لاستخدامه فى مشروع
لكن ظهر هذا الخطأ الأخضر المتعرج تحت كلمة enumerator
وأريد بالطبع معرفة السبب ومن ثم تصحيحه
PHP كود :
Friend Shared Function GetProcessorId() As String
Dim enumerator As ManagementObjectEnumerator
Dim str2 As String = String.Empty
Dim searcher As New ManagementObjectSearcher(New SelectQuery("Win32_processor"))
Try
enumerator = searcher.Get.GetEnumerator
Do While True
If Not enumerator.MoveNext Then
Exit Do
End If
Dim current As ManagementObject = DirectCast(enumerator.Current, ManagementObject)
str2 = current("processorId").ToString
Loop
Finally
If Not Object.ReferenceEquals(enumerator, Nothing) Then
enumerator.Dispose
End If
End Try
Return str2
End Function
شكراً مقدماً