主题：[求助] 提示错误

If Forms("装机工单清单表维护窗口(预约)").Opened Then
    Dim tv As WinForm.TextBox   = Forms("装机工单清单表维护窗口(预约)").Controls("直通车")
    Dim r As Row = Tables("装机工单清单表").current
   
    Dim dr2 As DataRow = DataTables("外线人员清单表").Find("姓名 = '" & r("装维人员姓名") & "' ")
    If dr2 IsNot Nothing  Then
        tv.text = dr2("直通车")
        ' e.Form.Controls("站长姓名").text = dr2("姓名")
    Else
        tv.text = Nothing
    End If
   
End If