将WPFDataGrid列标题设置为TextBlock

Question

我有DataGrid AutoGenerateColumns=True。

我想将ColumnHeaders设置为TextBlock，以便标题文字可以换行。

我有：

Private Sub OnAutoGeneratingColumn(sender As System.Object, e As System.Windows.Controls.DataGridAutoGeneratingColumnEventArgs)
....
    Dim tb As New TextBlock
    tb.TextWrapping = TextWrapping.Wrap
    tb.Text = SomeText
    e.Column.Header = tb
End Sub

在其他代码中，我可以看到ColumnHeader实际上是TextBlock，正在执行

Dim sHeader as String = DirectCast(dgtc.Header, TextBlock).Text

返回SomeText。

但是，网格不会在标题中显示任何文字！如果另一方面我设置

e.Column.Header = SomeText

标题显示确定。

我错过了什么？

我知道网站上有一些答案，但我找不到任何AutoGenerateColumns = True。