[عبدالله الدوسري]

وعليكم السلام ورحمة الله وبركاتة

كود :

       If TypeOf Form2  Is Form Then

       End If

---

الـ Form1 = الـ Form2 = الـ Form = الـ Control  = الـ Object

الـ Form1 أصلة Form
وفي نفس الوقت
الـ Form1 أصلة Control
وفي نفس الوقت
الـ Form1 أصلة Object

GetType تجيب فقط الـ declaration , الإعلان الذي قمت به 
وهو : dim Form2 as Form1
ما تجيب الكائن الأصل إلي تمت الوراثة منة , وهو الـ Form , والـ Form يرث الكائن Control , وهكذا إلى أن تصل إلى الكائن Object