Private findcontentarg As String
    Private Function findcontent(ByVal mae As myarray_element) As Boolean
        If findcontentarg = mae.content Then
            Return True
        Else
            Return False
        End If
    End Function