以文本方式查看主题

-  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=114308)

--  作者:guosheng
--  发布时间:2018/2/2 17:11:00
--  关于多个窗口控件引用“”同一个“”下拉窗口是否会引起冲突?
我测试了一下,同时引用一个下拉窗口并没有引起冲突,或者赋值错误。可以同时引用一个下拉窗口吗

下拉窗口的dropdownclosed:
If e.Selected Then \'如果选择了值                                  
    Dim tbl As Table = Tables("公司基本信息下拉框_公司名称表")
    If tbl.Current IsNot Nothing Then
        Tables("工程相关合同定标情况表").current("地块")=tbl.current("地块")                                     引用下拉窗口后的赋值
        Tables("工程相关合同定标情况表").current("公司名称")=tbl.current("公司名称")
    End If
End If

If e.Selected Then \'如果选择了值
    Dim tbl As Table = Tables("公司基本信息下拉框_公司名称表")                                                     再次引用下拉窗口后的赋值
    If tbl.Current IsNot Nothing Then
        Tables("合同基本信息表").current("地块")=tbl.current("地块")
        Tables("合同基本信息表").current("公司名称")=tbl.current("公司名称")
    End If
End If

--  作者:有点甜
--  发布时间:2018/2/2 17:31:00
--  

你应该判断是哪个控件下拉的,如

 

If e.Form.DropDownBox.Name = "控件1" Then

 

elseIf e.Form.DropDownBox.Name = "控件2" Then

 

End If

 

不然,肯定有冲突,你会修改了别的表的值。