If TypeOf ...Then ... ElseIf ... Else ... End If

Kontrolün isatenen tipte olup olmadığını kontrol ederek buna göre işlem yapar.

If TypeOf Control_Name Is TextBox Then
MsgBox "Bu Bir Metin Kutusu"
Else
MsgBox "Bu Bir Metin Kutusu Değil"
End If