Quiero escribir texto verticalmente dentro de un elemento de borde. Como se muestra en esta imagen.

He intentado usar RenderTransform con este código

<Border Width="80"
        Background="Teal">
  <TextBlock Text="CATEGORIES"
             Foreground="White"
             FontFamily="Segoe UI Black"
             FontSize="30">
    <TextBlock.RenderTransform>
      <RotateTransform Angle="-90" />
    </TextBlock.RenderTransform>
  </TextBlock>
</Border>

Esto gira el texto verticalmente, pero TextBlock toma los valores anteriores de alto y ancho antes de Transformar y no muestra el texto por completo. Por lo tanto, el texto se corta después de 80 píxeles (ancho del elemento del borde). Mientras buscaba, encontré que usar LayoutTransform puede resolver el problema, pero no está disponible en las aplicaciones para UWP. ¿Cómo hacer esto en UWP XAML?