专家坐堂-[求助] 条件显示列表公式Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 条件显示列表公式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48861)

--  作者：wumingrong1
--  发布时间：2014/4/7 18:08:00
--  [求助] 条件显示列表公式

此主题相关图片如下：360截图20140407180624435.jpg

\'If e.Form.Controls("采集日期").Value > ""
\' e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称","采集日期=\'" & e.Form.Controls("采集日期").Value & "\'")
\'Else
\'e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称")
\'End If

在“机房名称”框中Enter中设置以上公式，但是“采集日期”为时间日期格式，请问怎么修改才准确。

--  作者：y2287958
--  发布时间：2014/4/7 18:11:00
--
试试这个：
If e.Form.Controls("采集日期").Value > ""
\'e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称","采集日期=#" & e.Form.Controls("采集日期").Value & "#")
Else
e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称")
End If

--  作者：wumingrong1
--  发布时间：2014/4/7 20:46:00
--
还是不行，如果采集日期是字符型的1楼的公式就可以、但是采集日期是日期和时间型的就不行！！！！

--  作者：Bin
--  发布时间：2014/4/8 8:32:00
--

\'If e.Form.Controls("采集日期").Value isnot nothing then
\' e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称","采集日期=#" & e.Form.Controls("采集日期").Value & "#")
\'Else
\'e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称")
\'End If

--  作者：有点甜
--  发布时间：2014/4/8 9:01:00
--

\'If e.Form.Controls("采集日期").Value <> nothing

\' e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称","采集日期=#" & e.Form.Controls("采集日期").Value & "#")

\'Else

\'e.Sender.ComboList = DataTables("光功率表").GetComboListString("机房名称")

\'End If