主题：排序求助

求助在[引用本表]中规格列的下拉列表根据[排序]表序号列排序的代码

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:列表项目.table

没看懂

在[引用本表]表规格列的下拉列表中的规格是无序的，我想按[排序]表的规格列那样排序显示

这样可以：

此主题相关图片如下：未命名.jpg

你没理解我的需求

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

1、打开项目中的[引用本表]表；2、规格列的下拉列表中数据没有排序；3、我想按[排序]表的规格列那样排序

用GetComboListString应该是没有办法的，字符型数据排序方式2大开10000，所以2肯定排于10000后面。

這樣?

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

代码写在哪里?