以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  列表项目选择时出现错误  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=144644)

--  作者:aza520
--  发布时间:2019/12/26 9:39:00
--  列表项目选择时出现错误
我在表的奖励标准列设了列表项目,在选择时提示错误如图,请问老师怎么解决

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20191226093551.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:qq图片1111.png
图片点击可在新窗口打开查看


我在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

--  作者:有点蓝
--  发布时间:2019/12/26 9:50:00
--  
If e.Col.name = “下拉窗口绑定的列名” andalso e.Col.DroppedDown Then \'