Sub GetAutoTextSizeLabelFromTag(tag As String) As AutoTextSizeLabel
   Dim res As AutoTextSizeLabel
   For Each v As View In Activity.GetAllViewsRecursive
       If v.Tag Is AutoTextSizeLabelTag Then
           Dim atag As AutoTextSizeLabelTag = v.Tag
           If atag.Name = tag Then Return atag.Instance
       End If
   Next
   Return res
End Sub