任务四

设计一个根据需要动态加载数据的按钮。
我们用“订单2”表来测试,希望打开项目的时候,该表不加载任何数据,由用户选择加载哪一个时间段的数据。

先要做的是在项目的BeforeLoadInnerTable事件中设置如下代码:

If e.DataTableName = "订单2" Then
    e.Filter =
"False"

End
If

这样打开项目之后,“订单2”表不会加载任何数据。

然后在菜单中增加一个的菜单按钮,标题设为“加载数据”,给该菜单按钮的项目集合中增加两个标准按钮:

名称 标题
Q1 一季度
Q2 二季度

Q1的代码设为:

DataTables("订单2").LoadFilter = "[日期] Between #1999-1-1# And #1999-2-28#"
DataTables
("订单2").Load()

Q2的代码设为:

DataTables("订单2").LoadFilter = "[日期] Between #1999-3-1# And #1999-5-31#"
DataTables
("订单2").Load()

这样打开项目后,单击Q1和Q2,分别会加载第一季度和第二季度的数据。


本页地址:http://www.foxtable.com/webhelp/topics/1136.htm