| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]窗口中的表控件和下拉窗口的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=106397) |
| -- 作者：zyl19810322 -- 发布时间：2017/9/7 22:06:00 -- [求助]窗口中的表控件和下拉窗口的问题 设计了一个下拉窗口，在一般表中可以正常使用，但是在窗口的table控件中为啥就不能用了？ If e.Node.Nodes.Count = 0 Then \'如果无下级节点 Dim tr As Row Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow If e.Form.DropTable IsNot Nothing Then \'如果下拉窗口是从表中打开 tr = e.Form.DropTable.Current \'获取此表的当前行 Else \'如果下拉窗口是通过DropdownBox打开 Dim nm As String = e.Form.DropDownBox.BindingField \'获取绑定的字段 nm = nm.Split(".")(0) \'获取绑定的表名 tr = Tables(nm).Current \'获取此表的当前行 End If tr("法律条文编码") = dr("法律条文编码") e.Form.DropDownBox.Value = tr("法律条文编码") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据. e.Form.DropDownBox.CloseDropdown |
| -- 作者：有点甜 -- 发布时间：2017/9/7 22:13:00 -- 不能用，指什么？报错？还是没有下拉？
http://www.foxtable.com/webhelp/scr/2115.htm
|
| -- 作者：zyl19810322 -- 发布时间：2017/9/8 6:49:00 -- 没有下拉框了 |
| -- 作者：有点甜 -- 发布时间：2017/9/8 8:39:00 -- 以下是引用zyl19810322在2017/9/8 6:49:00的发言：
没有下拉框了
窗口AfterLoad事件写代码
e.Form.Controls("Table1").Table.Cols("第一列").DropForm = "窗口1" |