以文本方式查看主题

-  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=33153)
--  作者：haoting2000
--  发布时间：2013/5/14 21:26:00
--  自定义录入窗口三请教

按照自定义录入窗口教程。

 

Tables("订单").Cols("客户ID").DropForm = "窗口1"

 

 

这个语句是在表中可以打开下拉窗口。 但是记录窗口中输入的时候，无法打开。 应该增加哪个语句？
--  作者：XYT
--  发布时间：2013/5/15 8:31:00
--  

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
--  作者：Bin
--  发布时间：2013/5/15 8:32:00
--  
必须是下拉窗口控件才可以  Dropdownbox