lidt nemmer (if not O is nothing, if O.gettype.isarray)

Hej hvordan laver jeg dette lidt nemmere, eller på den rigtige måde ;)
"if not is nothing" lyder til der er en nemmer måde?

                o = objMgmt("der")
                If Not o Is Nothing Then
                    If o.GetType.IsArray Then
                        For i = 0 To UBound(objMgmt("der"))
                            If der<> "" Then der= der& " , "
                            der= objMgmt("der")(i)
                        Next
                    End If
                End If