VB.NET WPF流文档ComboBox修改样式触发异常后才成功运行如何解决？

问题根本原因 #

该问题是WPF控件模板的延迟加载机制导致的：

• 首次访问ComboBox的模板内部PART节点时，模板还未完成完全渲染构建，PART_ContentHost对应的对象还未生成，所以会抛出空引用异常
• 原代码中Catch块的MsgBox是模态弹窗，弹出时会让出UI线程调度时间，WPF会利用这段时间完成所有待处理的控件模板渲染工作，所以弹窗关闭后后续逻辑都能正常运行
• 注释掉MsgBox后没有让出UI时间片，模板来不及完成构建，所以所有样式设置都会跳过

解决方案 #

从根源避免异常，不要依赖抛异常+弹窗的方式等待模板加载，使用WPF官方提供的方法强制模板加载即可：

1. 调用控件的ApplyTemplate()方法，该方法会强制控件立即构建模板树，成功执行后所有PART节点都可以正常访问
2. 每一步获取对象后做空引用校验，用TryCast做类型转换避免空引用异常
3. 移除无意义的对象初始化操作（原代码中New Object、New TextBox等操作后立刻覆盖赋值，完全多余，会造成不必要的内存开销）
4. 移除弹窗逻辑，从根源避免异常后就不需要捕获弹窗

优化后的代码 #

' 先强制ComboBox加载模板
objCombo.ApplyTemplate()
' 查找PART_EditableTextBox
Dim objHold = objCombo.Template.FindName("PART_EditableTextBox", objCombo)
' 用TryCast转换，失败返回Nothing不抛异常
Dim tbTemp = TryCast(objHold, TextBox)
If tbTemp Is Nothing Then Exit Sub ' 找不到直接退出，不报错

' 强制TextBox加载自身模板
tbTemp.ApplyTemplate()
Dim objCheck = tbTemp.Template.FindName("PART_ContentHost", tbTemp)
Dim svTemp = TryCast(objCheck, ScrollViewer)
If svTemp IsNot Nothing Then
    svTemp.Background = New SolidColorBrush(ColorConverter.ConvertFromString(strTheme(11)))
End If

特殊场景兼容 #

如果存在个别控件未挂载到视觉树导致ApplyTemplate执行失败的情况，可以把样式逻辑放到控件的Loaded事件中执行，保证控件完全初始化后再操作：

AddHandler objCombo.Loaded, Sub(s, e)
    Dim combo = CType(s, ComboBox)
    combo.ApplyTemplate()
    ' 后续样式设置逻辑和上面一致
    RemoveHandler combo.Loaded, Sub(s,e) ' 解绑事件避免重复触发
End Sub

以上修改完成后，完全不需要Try...Catch块也不会抛出异常，也不会有弹窗，所有ComboBox的样式都可以正常设置。

内容的提问来源于stack exchange，提问作者user20568