[求助]能否在狐表里使用下面的第三方DLL进行运算 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

并集
若 A 和 B 是集合，则 A 和 B 并集是有所有 A 的元素和所有 B 的元素，而没有其他元素的集合。 A 和 B 的并集通常写作 "A ∪B"。形式上：

x 是 A ∪B 的元素，当且仅当
x 是 A 的元素，或
x 是 B 的元素。
举例：集合 {1, 2, 3} 和 {2,3,4,5,6} 的并集是 {1, 2, 3, 4,5,6}。

Dim Ls1 As String() = {1,2,3}
Dim Ls2 As String() = {2,3,4,5,6}
Dim LsB As New List(Of String)
Dim Ls ,Tz As String

For Each Ls In Ls1
Tz = Tz & "|" & Ls
LsB.Add(Ls)
Next

For Each Ls In Ls2
    if Tz.Indexof(Ls) = -1 then
        LsB.Add(Ls)
    End If
Next

交集
A 和 B 的交集写作 "A ∩B"。形式上：

x 属于 A ∩B 当且仅当
x 属于 A，且
x 属于 B。
例如：集合 {1, 2, 3} 和 {2,3,4,5,6} 的交集为 {2, 3}。

Dim Ls1 As String() = {1,2,3}
Dim Ls2 As String() = {2,3,4,5,6}
Dim LsB As New List(Of String)
Dim L1 ,L2 As String

For Each L1 In Ls1
    For Each L2 In Ls2
        if L1 = L2 then
             LsB.Add(L1)
             Exit For
        End If
    Next
Next

[此贴子已经被作者于2009-4-8 13:16:46编辑过]

主题：[求助]能否在狐表里使用下面的第三方DLL进行运算