السلام عليكم
ممكن من اخواني
كود بالسي شارب مثل هذا
Imports System.Management
Dim HDinformation As New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")
Dim HD As ManagementObject
For Each HD In HDinformation.Get()
TextBox1.Text = HD("SerialNumber").ToString()
Next
يعني اريد جلب رقم الهارد بالسي شارب