以文本方式查看主题

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

--  作者:wumingrong1
--  发布时间:2014/2/8 14:23:00
--  [求助] 下拉菜单显示错误
如下命令,当”业务名称“和”机房名称“都有内容时,”光缆名称“的下拉菜单无法正常进行显示;问题是不是出在第二个IF。该怎么写才正确?

Dim l As WinForm.ComboBox = e.Form.Controls("业务名称")
Dim i As WinForm.ComboBox = e.Form.Controls("机房名称")

If l.Value > "" And i.Value = "" 
    e.Sender.ComboList = DataTables("光缆纤芯应用台帐表").GetComboListString("光缆名称","业务名称=\'" & l.Value & "\'")
Else

If l.Value > "" And i.Value > "" 
    e.Sender.ComboList = DataTables("光缆纤芯应用台帐表").GetComboListString("光缆名称","业务名称=\'" & l.Value & "\'" And "机房名称=\'" & i.Value & "\'")
Else

If l.Value = "" And i.Value > "" 
    e.Sender.ComboList = DataTables("光缆纤芯应用台帐表").GetComboListString("光缆名称","机房名称=\'" & i.Value & "\'")

Else
    e.Sender.ComboList = DataTables("光缆纤芯应用台帐表").GetComboListString("光缆名称")
End If

End If
End If

--  作者:Bin
--  发布时间:2014/2/8 14:31:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=45638&authorid=0&page=0&star=1
--  作者:lsy
--  发布时间:2014/2/8 14:31:00
--  

传代码,还没有传例子方便。

而有例子,得到答复更快,准确性更高。


--  作者:wumingrong1
--  发布时间:2014/2/8 15:22:00
--  
附件项目 存在以下几个错误,帮忙看看是什么问题 1、当”业务名称“和”机房名称“同时输入有内容时、再选择”光缆名称“下拉框时提示错误; 2、按下”撤销筛选“按钮时、系统提示错误并且整个系统无法进行操作;(有可能是和我在表BeforeSelChange事件中做的设置产生冲突),需要怎样处理? 3、我希望当所有的条件框中都没有录入内容时、提示“请输入查询条件”;如果任何条件框中任意组合有内容时就按照条件框中内容组合进行查询。 但是现在当所有条件框中都没有录入内容时、按下”查询“按钮时、系统提示错误并且整个系统无法进行操作;(有可能是和我在表BeforeSelChange事件中做的设置产生冲突),需要怎样处理?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:lsy
--  发布时间:2014/2/8 16:16:00
--  
楼主从哪动态生成控件了吗,怎么“ODF盘”组合框删不掉?
--  作者:lsy
--  发布时间:2014/2/8 16:37:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多条件组合查询.table