- 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=161102)
-- 发布时间：2021/3/5 21:07:00
-- 自定义项目没反应
我在cellbottonclick 事件总加入：
Forms("农户派工单选择").Open
e.Cancel = True
在列属性中的自定义项目中输入：...
保存后，单击单元格时，没有反应
请问哪里设置错了，请指教，谢谢！
-- 发布时间：2021/3/6 8:57:00
--
换下代码位置
e.Cancel = True
Forms("农户派工单选择").Open
-- 发布时间：2021/3/6 17:45:00
--
换了位置还是没有反应
-- 发布时间：2021/3/6 17:48:00
--
派工单明细表中的“村别”字段，请帮看下，谢谢！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:江安镇徐柴村日常事务管理系统.zip |
-- 发布时间：2021/3/6 20:58:00
--
另外，我想在打开“农户身份选择”下拉窗体，执行选择操作后，让目录树自动收起至Level（1），代码如何修改？请一并指教一下，谢谢！
-- 发布时间：2021/3/7 20:28:00
--
这种用法"农户派工单选择"必须是独立，或者模式窗口
If e.Node.Level = 2 Then \'如果单击的是第三层节点
Dim tr As Row = Tables("身份证变更").Current
Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
e.Node.ParentNode.CollapseAll
tr("村别") = dr("村别")
tr("组别") = dr("村民组")
tr("农户姓名") = dr("农户姓名")
tr("一折通号码") = dr("一折通号码")
tr("身份证号码") = dr("身份证号码")
e.Form.DropDownBox.Value = tr("村别") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.
e.Form.DropDownBox.CloseDropdown()
End If