Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于DropForm


  共有1943人关注过本帖树形打印复制链接

主题：关于DropForm
美女呀，离线，留言给我吧！
sara
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1871 积分：12372 威望：0 精华：0 注册：2014/11/12 16:09:00 		关于DropForm  发帖心情 Post By：2016/9/10 8:46:00 [只看该作者]

我想这样，就是Table表有一个逻辑列，这个列为True时候，用DropForm列出一个下拉表，如果为false就直接还是编辑框，可以自己输入内容，可以实现吗

 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107743 积分：548054 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/10 9:38:00 [只看该作者]

可以用逻辑列来控制其它列是否有下拉表，不能控制逻辑列本身

Select Case e.DataCol.Name
    Case "第二列"
        If e.NewValue = True Then
            Tables(e.DataTable.Name).Cols("第三列").DropForm = "窗口1"
        Else
            Tables(e.DataTable.Name).Cols("第三列").DropForm = Nothing
        End If
End Select
 回到顶部
美女呀，离线，留言给我吧！
sara
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1871 积分：12372 威望：0 精华：0 注册：2014/11/12 16:09:00 		  发帖心情 Post By：2016/9/10 9:53:00 [只看该作者]

在哪里写代码

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107743 积分：548054 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2016/9/10 9:55:00 [只看该作者]

DataColChanged

 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47448 积分：251060 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2016/9/10 10:01:00 [只看该作者]

这个在PrepareEdit事件会更合适一些：

 

If e.Col.name = "第二列" Then
   If e.IsFocusCell And e.Row("逻辑列") = True Then
        e.Col.DropForm  = "窗口1"
   Else
        e.Col.DropForm  = ""
    End If
End If
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03125 秒, 4 次数据查询