主题：输入法和列表项目

不会用,我只知道这段代码,但不要手工添加
'B表引用A表,可手工添加
If Maintable.Name = "B表" Then
    Dim Item,Ls As String
    Dim lst1 As List(Of String) = DataTables("A表").GetuniqueValues("","分类")
    Dim lst2 As List(Of String) = DataTables("B表").GetuniqueValues("","分类")
    For Each Item  In Lst1
        Ls = Ls & "|" & Item
    Next
    For Each Item  In Lst2
        if Ls.Indexof(Item) = -1 then
            Ls = Ls & "|" & Item
        End if
    Next 
   Tables("B表").Cols("分类").ComboList = Ls
End If

Tables("B表").Cols("分类").ComboList = Ls.trim("|")

上述代码加上在列属性中设置不能直接输入就行了?

这个不管用还是可以手工录入。。。。

再将列属性“允许直接输入”设为False

ok

与帮助中的ComboList里说明（如果希望能够输入不在列表项目中的内容，列表项目内容以符号"|"开始即可）的不符，就是说如果不以符号"|"开始则应不能手工录入吧？

帮助有误

  关键的属性,讲了半天没有讲到点子.

http://www.foxtable.com/dispbbs.asp?BoardID=2&ID=118这个下载不了.