Introspection.getType of control array element

In trying to get the class name of a control array element I find that:

Dim ti As Introspection.TypeInfo = introspection.getType(cntrl)
Dim className As String = ti.Name

results in the name of the instance of the class (e.g. checkbox1) rather the underlying class (e.g. checkbox). The above works correctly for non-arrayed controls, but not control arrays.

How do I get to the name of the underlying class?

Answering my own question. If it is a control array then

Dim ti As Introspection.TypeInfo = introspection.getType(cntrl)
ti = ti.BaseType
Dim className As String = ti.Name

gets the underlying class.