| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]查询窗口如何与录入窗口共用下拉窗口 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=34599) |
| -- 作者：dengzhihao -- 发布时间：2013/6/9 22:51:00 -- [求助]查询窗口如何与录入窗口共用下拉窗口 在录入窗口中有个“客户名称”的下拉窗口 If e.Node.Level = 1 Then \'如果单击的是第二层节点 Dim ps() As String = e.Node.FullPath.Split("\\") Dim tr As Row = Tables("销售主表").Current Dim dr As DataRow = DataTables("客户表").Find("客户地址 = \'" & ps(0) & "\' And 客户名称 = \'" & ps(1) & "\'") If dr IsNot Nothing Then \'如果在行政区域表找到对应的行,则将此行的值写入客户表的当前行. tr("客户名称") = dr("客户名称") e.Form.DropDownBox.Value = tr("客户名称") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据. End If e.Form.DropDownBox.CloseDropdown() \'关闭下拉目录树 End If 现在是在查询窗口同意也用这个下拉窗口，问题是当选择“客户名称”的同时，改变了原表中的“客户名称”！ 现请教如何共用下拉窗口，在查询窗口选择“客户名称”时，不会同时改变原来表中的“客户名称”！
|
| -- 作者：程兴刚 -- 发布时间：2013/6/9 22:56:00 -- 1、用全局变量保存窗口名称，打开窗口时就将该窗口的名称写入全局变量（两个窗口打开时均需设置全局变量的值）！ 2、判断全局变量等当前窗口名，执行您上面的代码，等于另一窗口，执行其他代码即可，看您的功底，这样提示一下您应该可以搞定！ [此贴子已经被作者于2013-6-9 22:56:52编辑过]
|
| -- 作者：狐狸爸爸 -- 发布时间：2013/6/13 9:29:00 -- 你可以看看： http://www.foxtable.com/help/topics/2704.htm http://www.foxtable.com/help/topics/2705.htm
还有这个帖子的12楼： http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=33606&authorid=0&page=2&star=1
|
| -- 作者：zyqzyy -- 发布时间：2013/12/12 11:17:00 -- 要学习！ |