Rss & SiteMap

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

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

标题:[求助]越用越少

1楼
phrygia 发表于:2011/6/27 19:27:00

下拉菜单中有:A,B,C,D
我在第一列格中选择A

在第二列中的下拉菜单中就不会出现A

同样第二列我选择C后,在其他的列中就不会出现C

用掉一个选项,下拉菜单中就少掉一个

2楼
mr725 发表于:2011/6/27 21:09:00

应该不复杂呀。 提供个例子来吧。

3楼
blackzhu 发表于:2011/6/28 7:44:00
按我的智商只能这样做.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:项目列表逐次减少.table

4楼
狐狸爸爸 发表于:2011/6/28 8:33:00

楼主要的应该是这个:

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目87.table

5楼
程兴刚 发表于:2011/6/28 8:41:00
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.table

6楼
程兴刚 发表于:2011/6/28 8:42:00
呵呵,又马后炮了!
7楼
狐狸爸爸 发表于:2011/6/28 8:51:00
以下是引用程兴刚在2011-6-28 8:42:00的发言:
呵呵,又马后炮了!

 

图片点击可在新窗口打开查看

8楼
blackzhu 发表于:2011/6/28 9:44:00
哦,我理解错了.
9楼
明丰 发表于:2011/6/28 9:48:00

Dim nms() As String = {"第一列","第二列","第三列","第四列"}
Select Case e.Col.name
    Case "第一列","第二列","第三列","第四列"
        Dim lst As new List(of String)
        lst.AddRange(New String() {"a","b","c","d"})
        For Each nm As String In nms
            If e.Col.Name <> nm Then
                If lst.Contains(e.Row(nm)) Then
                    lst.Remove(e.Row(nm))
                End If
            End If
        Next
        e.col.ComboList = String.Join("|",lst.ToArray)
End Select

 

上面代码的{"a","b","c","d"}内容如果来源于表B第一列,请问如何设置?

10楼
狐狸爸爸 发表于:2011/6/28 9:59:00

Dim nms() As String  = DataTables("订单").GetUniqueValues("", "客户").ToArray

共12 条记录, 每页显示 10 条, 页签: [1] [2]

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

Powered By Dvbbs Version 8.3.0
Processed in .03906 s, 5 queries.