以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  ChangeEdit事件代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=125126)

--  作者:aza520
--  发布时间:2018/9/20 11:49:00
--  ChangeEdit事件代码
表的ChangeEdit事件代码如下,选择的时候显示错误

.NET Framework 版本:2.0.50727.8833
Foxtable 版本:2017.12.18.1
错误所在事件:S征地明细,ChangeEdit
详细错误信息:
未将对象引用设置到对象的实例。


If e.Col.DroppedDown Then \'如果下拉窗口已经打开
    Dim trv As WinForm.TreeView = Forms("青苗补偿标准").Controls("TreeView1")
    If e.Text > "" Then \'如果内容为空
        For Each nd As WinForm.TreeNode In trv.AllNodes
            If nd.Text.IndexOf(e.Text) >= 0 Then
                trv.StopRedraw()
                trv.SelectedNode = nd
                nd.EnsureVisible()
                trv.ResumeRedraw()
                Exit For
            End If
        Next
    End If
End If

--  作者:有点甜
--  发布时间:2018/9/20 12:00:00
--  

 你窗口【青苗补偿标准】打开了没有?

 

 如果打开了还报错,实例发上来测试。