| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教,在FOX如何实现表达式的列表项目? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75) |
| -- 作者：cpayinyuan -- 发布时间：2008/9/1 15:20:00 -- 请教,在FOX如何实现表达式的列表项目? 在易表中,列表项目主要有3种,自定义列表项目,根据列,根据表达式.在FOX中,前两种在菜单中都有,但我没有找如何用函数和表达式生成列表项目，我在命令大全中也没有看到这样的函数（命令），请老师指导一下！ |
| -- 作者：狐狸爸爸 -- 发布时间：2008/9/1 15:23:00 -- 在开发指南部分，慢慢来吧。 |
| -- 作者：smileboy -- 发布时间：2008/9/1 15:26:00 -- GetUniqueValues 从指定列中，获取不重复的值，以集合的形式返回。 语法： GetUniqueValues(Filter, Col1, Col, Col3....) Filter: 条件表达式。 如果只从一列中提取不重复值，那么返回的是一个字符串集合；如果从多列中提取不重复值，那么返回的是一个字符串数组集合，数组的长度等于指定的列数。 在执行以下示例之前，请打开CaseStudy目录下的示例文件"统计演示.Table"。 示例一 列出订单表中所有的客户名单： Dim Customers As List(Of String)Customers = DataTables("订单").GetUniqueValues("", "客户") For Each Customer As String In Customers Output.Show(Customer) Next 示例二 订购1999年6月1日后订购过PD01产品的客户名单： Dim Customers As List(Of String)Customers = DataTables("订单").GetUniqueValues("[产品]= \'PD01\' And [日期] > #6/1/1999#", "客户") For i As Integer = 0 To Customers.Count - 1 \'其实用For Each好一点，这里只是顺便提供遍历集合的另一种用法。 Output.Show(Customers(i)) Next 示例三 从客户列和产品列提取不重复的值： \'定义数组集合的时候，要在类型后加上括号，表示这是一个数组集合。 Dim Arys As List(Of String()) Arys = DataTables("订单").GetUniqueValues("", "客户","产品") \'注意循环变量是字符型数组，所以类型是String()，而不是String For Each Ary As String() In Arys Output.Show(Ary(0) & "|" & Ary(1)) Next |
| -- 作者：cpayinyuan -- 发布时间：2008/9/1 15:27:00 -- 开发指南部分我也没有找到啊,请老师指导具体哪一部分!? 如题,正在等待. |
| -- 作者：狐狸爸爸 -- 发布时间：2008/9/1 15:36:00 -- 以下是引用cpayinyuan在2008-9-1 15:27:00的发言：
如题,正在等待.
|
| -- 作者：狐狸爸爸 -- 发布时间：2008/9/1 15:38:00 -- CaseStudy目录下，有一个"自动输入.table"的演示文件，可以参考参考。 |
| -- 作者：狐狸爸爸 -- 发布时间：2008/9/1 16:06:00 -- 以下是引用109700在2008-9-1 16:04:00的发言：
这个没有易表一般的一个表达式完成了？
|
| -- 作者：jzhdwu -- 发布时间：2008/11/1 19:40:00 -- 请问foxtable开发的软件能与Autocad之间如何进行数据传递?或者说如何根据foxtable中的数据在Autocad成图? |
| -- 作者：程兴刚 -- 发布时间：2008/11/2 0:43:00 -- 提问不要跟在别人的帖子后面！ |