TextBlock の中身を一時退避 & 復元する。こんな感じでいいかな?
' oTextBlock の中身を退避する Dim arrayOfInline(oTextBlock.Inlines.Count -1) As Inline oTextBlock.Inlines.CopyTo(arrayOfInline, 0) '・・・ oTextBlock に別の値をセットする等・・・ ' 元の値を復元する oTextBlock.Inlines.Clear oTextBlock.Inlines.AddRange(arrayOfInline)