كود الحصول على معلومات اللوحة الأم

Public Function GetMotherboardSerialNumber() As String
		Dim searcher As New System.Management.ManagementObjectSearcher("SELECT SerialNumber FROM Win32_BaseBoard")

		For Each obj As System.Management.ManagementObject In searcher.Get
			Return obj.Properties("SerialNumber").Value.ToString
		Next

		Return String.Empty
	End Function