以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  限制条件加载树  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=174394)

--  作者:dokings
--  发布时间:2022/1/13 13:20:00
--  限制条件加载树
Dim y As Integer = val(RibbonTabs("功能区1")(“功能组1")("组合框1").text) \'指定年份
Dim dt As New Date(y)
Tables("表A").OpenLoadTree("Customer|Date","Year(Date) = # & dt & #")


这个有报错,按组合框的年份加载部分数据,这个要怎么写? 帮忙看下

--  作者:有点蓝
--  发布时间:2022/1/13 13:43:00
--  
首先合并条件的方法不对:http://www.foxtable.com/webhelp/topics/1284.htm
其次OpenLoadTree的条件是第5个参数,不是第2个:http://www.foxtable.com/webhelp/topics/2022.htm

Dim y As Integer = val(RibbonTabs("功能区1")(“功能组1")("组合框1").text) \'指定年份
Tables("表A").OpenLoadTree("Customer|Date",150,30,True,"Year(Date) = " & y)