مهدی جان این ocx رو من قبلا استفاده کردم و یه مشکل خیلی خنده دار داره
وقتی این ocx رو روی فرم قرار میدی شماره سریال هاردت رو بدست می آره و انگار تو خودش ذخیره میکنه
و وقتی که exe رو ساختی و بردی روی یه کامپیوتر دیگه می آد و همون شماره سریال هارد خودت رو نشون می ده به جای اینکه شماره سریال هارد مقصد رو بگیره
من یه راه حل هم براش پیدا کرده بودم که البته شاید راه حل بهتری هم براش وجود داشته باشه و من بی خبرم
اما راه حل این بود : فایل ocx رو به dll تغییر پسوند بدید
و از طریق منوی project و گزینه references اونو به فرم اضافه کنین
و هر وقت که نیاز بود شماره سریال هارد رو بدست بیارین اونو به صورت دینامیک صدا بزنین
Dim x As New HardWareInfo
MsgBox x.HardDisk1SerialNumber
خوش باشین