UserControl.ScaleY(lblSelect.TOp + lblSelect.Height,
       UserControl.ScaleMode, vbPixels)
      txtFile.Width = UserControl.ScaleWidth - txtFile.Left - cmdBrowse.Width -
       UserControl.ScaleX(4, vbPixels, UserControl.ScaleMode)
      cmdBrowse.Left = txtFile.Width + txtFile.Left + UserControl.ScaleX(2,
       vbPixels, UserControl.ScaleMode)
      lblLookFor.Width = UserControl.ScaleWidth - lblLookFor.Left * 2
      lblSelect.Width = lblLookFor.Width
   Else
      m_lTop = 2
   End If
   Dim tR As RE