Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共11 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:请教,在FOX如何实现表达式的列表项目?

1楼
cpayinyuan 发表于:2008/9/1 15:20:00
在易表中,列表项目主要有3种,自定义列表项目,根据列,根据表达式.在FOX中,前两种在菜单中都有,但我没有找如何用函数和表达式生成列表项目,我在命令大全中也没有看到这样的函数(命令),请老师指导一下!
2楼
狐狸爸爸 发表于:2008/9/1 15:23:00

在开发指南部分,慢慢来吧。

3楼
smileboy 发表于:2008/9/1 15:26:00

GetUniqueValues

从指定列中,获取不重复的值,以集合的形式返回。

语法:

GetUniqueValues(Filter, Col1, Col, Col3....)

Filter: 条件表达式。
Col1: 指定列名称,可以指定多列。

如果只从一列中提取不重复值,那么返回的是一个字符串集合;如果从多列中提取不重复值,那么返回的是一个字符串数组集合,数组的长度等于指定的列数。

在执行以下示例之前,请打开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

4楼
cpayinyuan 发表于:2008/9/1 15:27:00
如题,正在等待.
5楼
狐狸爸爸 发表于:2008/9/1 15:36:00
以下是引用cpayinyuan在2008-9-1 15:27:00的发言:
如题,正在等待.


建议你不要跳着来,从头看一篇,专业报表就不用看了。

6楼
狐狸爸爸 发表于:2008/9/1 15:38:00

CaseStudy目录下,有一个"自动输入.table"的演示文件,可以参考参考。

7楼
109700 发表于:2008/9/1 16:04:00
用户已锁定!
8楼
狐狸爸爸 发表于:2008/9/1 16:06:00
以下是引用109700在2008-9-1 16:04:00的发言:
这个没有易表一般的一个表达式完成了?


最然行数多点,但是条例清晰,可以轻松应付各种复杂的要求。

9楼
109700 发表于:2008/9/1 16:09:00
用户已锁定!
10楼
jzhdwu 发表于:2008/11/1 19:40:00

请问foxtable开发的软件能与Autocad之间如何进行数据传递?或者说如何根据foxtable中的数据在Autocad成图?
共11 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02734 s, 2 queries.