- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 按条件开启下拉窗口问题（已解决） (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=164879)
-- 发布时间：2021/5/7 17:04:00
-- 按条件开启下拉窗口问题（已解决）
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.table |
第一列为数字，当第一列大于等于2时，点击该行的第二列则开启下拉窗口
现在有2个问题：
1.按以下代码执行，第二列下拉窗口是按列的，若是第二列第一行能开启下拉窗口，其他所有都开启了。第二列的每一行下拉窗口按第一列的条件开启的代码应该怎么写？
2. 以下代码放在datacolchanged 里似乎有问题，因只有在数据发生变动时才会 执行，应该放在那里更合适。
If e.DataCol.Name = "第一列" Then
If e.DataRow("第一列") >=2 Then
Tables("表A").Cols("第二列").DropForm = "窗口1"
Else
Tables("表A").Cols("第二列").DropForm = Nothing
End If
End If
[此贴子已经被作者于2021/5/7 17:26:00编辑过]
-- 发布时间：2021/5/7 17:11:00
--
这种功能到PrepareEdit事件处理
-- 发布时间：2021/5/7 17:26:00
--
PrepareEdit 事件 可以了
If e.Col.Name = "第一列" Then
If e.Row("第一列") >=2 Then
Tables("表A").Cols("第二列").DropForm = "窗口1"
Else
Tables("表A").Cols("第二列").DropForm = Nothing
End If
End If