以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  排序求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4398)

--  作者:实话实说
--  发布时间:2009/9/18 21:14:00
--  排序求助
求助在[引用本表]中规格列的下拉列表根据[排序]表序号列排序的代码
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:列表项目.table


--  作者:czy
--  发布时间:2009/9/18 21:43:00
--  
没看懂
--  作者:实话实说
--  发布时间:2009/9/18 22:35:00
--  
在[引用本表]表规格列的下拉列表中的规格是无序的,我想按[排序]表的规格列那样排序显示
--  作者:mr725
--  发布时间:2009/9/19 0:20:00
--  
这样可以:

图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看

--  作者:实话实说
--  发布时间:2009/9/19 6:41:00
--  求 高手帮忙修改一下 用户登录窗口一下 谢谢
以下是引用mr725在2009-9-19 0:20:00的发言:
这样可以:

你没理解我的需求


--  作者:yangming
--  发布时间:2009/9/19 10:41:00
--  
以下是引用实话实说在2009-9-19 6:41:00的发言:

你没理解我的需求

你的需求我也没理解,呵呵


--  作者:实话实说
--  发布时间:2009/9/19 11:34:00
--  
1、打开项目中的[引用本表]表;2、规格列的下拉列表中数据没有排序;3、我想按[排序]表的规格列那样排序
--  作者:czy
--  发布时间:2009/9/19 11:51:00
--  
GetComboListString应该是没有办法的,字符型数据排序方式2大开10000,所以2肯定排于10000后面。
[此贴子已经被作者于2009-9-19 12:00:54编辑过]

--  作者:HLJ
--  发布时间:2009/9/19 11:54:00
--  




這樣?

Dim T As String
Dim Ls As New List(Of String)

For Each r As Row In Tables("排序").Rows
    If  Ls.Contains(r("规格")) = False Then
        Ls.Add(r("规格"))
        T = T & "|" &  r("规格")
    End If
Next

Return T


--  作者:实话实说
--  发布时间:2009/9/19 12:01:00
--  
代码写在哪里?