以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  下拉窗口不打开的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139661)

--  作者:deliangzhaoe
--  发布时间:2019/8/18 19:26:00
--  下拉窗口不打开的问题
主窗口中的页面集合三个页面中,分别加入了一个记录窗口,记录窗口的某行输入数据时,使用下拉窗口模糊查找并输入,现在第一个页面集合中的下拉窗口可以打开,其他的打不开,怀疑是表keypressedit事件的e.RecordGrid的问题,老师帮忙改一下。谢谢
做了个实例,能打开,不知道是哪里代码出了问题。
keypressedit事件代码:
\'在某列输入内容时自动打开下拉窗口,不管是在表中还是在记录窗口中
If e.Col.Name = "企业名称" Then
    If e.RecordGrid Is Nothing Then \'如果是在表中输入数据
        If e.Col.DroppedDown = False Then
            e.Col.OpenDropDown()
        End If
    Else \'如果是在记录窗口输入数据
        If e.RecordGrid.DroppedDown = False Then
            e.RecordGrid.OpenDropDown()
        End If
    End If
End If
If e.Col.Name = "第二列" Then
    If e.RecordGrid Is Nothing Then \'如果是在表中输入数据
        If e.Col.DroppedDown = False Then
            e.Col.OpenDropDown()
        End If
    Else \'如果是在记录窗口输入数据
        If e.RecordGrid.DroppedDown = False Then
            e.RecordGrid.OpenDropDown()
        End If
    End If
End If
If e.Col.Name = "第三列" Then
    If e.RecordGrid Is Nothing Then \'如果是在表中输入数据
        If e.Col.DroppedDown = False Then
            e.Col.OpenDropDown()
        End If
    Else \'如果是在记录窗口输入数据
        If e.RecordGrid.DroppedDown = False Then
            e.RecordGrid.OpenDropDown()
        End If
    End If
End If


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:求助、.txt



--  作者:有点蓝
--  发布时间:2019/8/18 19:59:00
--  
表面看不出什么问题。上传实例看看
--  作者:deliangzhaoe
--  发布时间:2019/8/19 20:01:00
--  
已经解决,出了点小失误,谢谢了